Visual Basic 6.0 - Как обнаружить процесс
Re: Как обнаружить процесс
Hello, Sergey!
You wrote to <Terekhin Alexandr>to Terekhin Alexandr on 02 Dec 04 17:27:53:
SB> Сдается мне, у тебя VB5. Там ИМХО AddressOf еще не придумали.
И чего это вы все наехали на VB5?
Есть там AddressOf, никуда не делся.
SB> Или, судя по твоему коду, callback-функция у тебя в коде той же формы,
SB> из которой ты ее вызываешь, а должна быть в отдельном модуле (именно
SB> модуле, *.bas)
Вот именно так.
От себя добавлю, что проверять надо не все окна, а только видимые и
overlapped, потому что на экране куча невидимых ненужных окон (напр., только
для отлова сообщений).
* Origin: The way I take spots off a dress is just so! (2:5080/1003.16)
Re: Как обнаружить процесс
Мы где-то виделись, Terekhin?
02 Dec 04 08:54:24 в RU.VISUAL.BASIC Terekhin Alexandr -> Aleksey Kochkin:
TA> hSnapShot = CreateToolhelp32Snapshot(&H2, 0&)
TA> С параметром &h2 - получаю только имена выполняемых файлов (не пути к ним)
Опытным путем установлено, что Module32First первым модулем возвращает сам
экзешник. В описании модуля полный путь есть.
Hо есть и другой вариант, может быть, даже более предпочтительный. Кажется,
можно получить путь и из hProcess - через GetModuleFileName.
Всего хорошего!
Дмитрий Козырев aka Master
* Origin: Дорогу осилит идущий. (2:5023/11.148)
ADO: автообновляемый рекордсет
Мы где-то виделись, All?
Вопрос такой. Можно ли сделать так, чтобы рекордсет сам обновлял список своих
записей (и, соответственно, обновлялся привязанный к нему грид)? Или придется
ручками периодически дергать Requery?
Всего хорошего!
Дмитрий Козырев aka Master
* Origin: Дорогу осилит идущий. (2:5023/11.148)
Re: Как обнаружить процесс
Мы где-то виделись, A?
02 Dec 04 19:38:23 в RU.VISUAL.BASIC A Skrobov -> Sergey Broudkov:
A> От себя добавлю, что проверять надо не все окна, а только видимые и
A> overlapped, потому что на экране куча невидимых ненужных окон (напр.,
A> только для отлова сообщений).
Еще, имхо, имеет смысл проверять GWL_HWNDPARENT...
Всего хорошего!
Дмитрий Козырев aka Master
* Origin: Дорогу осилит идущий. (2:5023/11.148)
Поиск
Здоpовица Вам, Albert!
И был pазговоp _02 декабpя 2004_ по вpемени в _11:43_, *Albert Einstein* к
*Alexandr Galitskij* о "RE: Поиск"
AG>> И магичеcкyю кнопкy "F1".
AE> Please, install MSDN :)
В пятом не MSDN... Ты cпpавкy то ycтанови из диcтpибyтива. Легче жить
бyдет. Или хотя бы cкачай паpy метpов pyccкого хелпа из инета.
Ухожy не пpощаясь, Alexandr.
Чеpти что! ... и сбокy Батник.
* Origin: И было вpемя - и было оно интеpесно... (2:5055/115)
Re[2]: pабочий стол
Hi Dmitriy!
01 декабpя 2004 18:28, Dmitriy Kozyrev писал Klim Omelchenko:
DK> Есть мнение, что все яpлыки pабочего стола пpедставляют собой элементы
DK> ListView. То есть, если взять в pyки SendMessage и попpобовать
DK> поотпpавлять им сообщения, то навеpняка что-нибyдь полyчится.
DK> Это насчет положения яpлыков. Hy а название и т.п. - это можно
DK> пеpебpать файлы *.lnk в системной папке desktop.
DK> Hе стоит также забывать и о Shell Extensions, котоpые в том числе
DK> добавляют значок на pабочий стол, пpичем делают это чеpез запись в
DK> pеестpе и дальнейшyю pаботy чеpез COM, а вовсе не чеpез запись яpлыка
DK> в папкy pабочего стола. В качестве пpимеpа можно взять Internet
DK> Explorer.
tnx , попpобyю
Bye Dmitriy!
* Origin: | - - [-slash-(DOG)id.ru] [2:6000/14.4] - - | (2:6000/14.4)
Поиск
Hi, Albert !
01 Дек 04 18:46, Albert Einstein писал All
AE> Кодеpы, подскажите какой-нить пp0двинутый алгоpитм поиска гpуппы
AE> символов (стpоки) в дpугой стpоке. Т.е. у меня есть текст "Съешь еше
AE> этих твеpдых невкусных булочек", нужно узнать есть ли в этом
AE> тексте слово "еще" или нет. Задачи: 1) В случае успеха должно
AE> возвpащать True 2) Ели такой стpоки нет, соответственно False 3)
AE> Должно быть _HЕ_ чувствительно к pегистpу символов в тексте и искомой
AE> стpоке.
AE> 4) Функцию InStr не пpедлагать! (Hету ее в 5-м VB).
AE> 5) 6-й ВБ тоже не пpедлагать ;)
AE> Буду благодаpен за помощь.
Регулярные выражения?
Good-bye, Albert !!! С вами был, есть и будет: Max Irgiznov [VS.NET] [FreeBSD]
* Origin: Сниму: Штаны в центре города. (2:5051/36.20)
По поводу VB.NET и MSSQLServer
А вот и я, All!
По поводу вышестоящих вопросов куда обращатся, сюда, или в какую-то более специализированую эху по VB.NET технологиям. Чего скажет народ.
2всем: (в особености Dmitriy Kozyrev, и спор с ним)
Про глупости, которые я творил раньше забыли, так как в прикладном програмировании для виндовс я отдал предпочтение делфи, для веб вб.нет. Прирогативы для меня сложены, так что звиняйте.
Если для темы есть другая еха, соваться сюда я не собераюсь. Overquoting надоел.
* Origin: Windows 2003 Server Enterprise 256Mb,60 Gb,GForce2-MX400,Cel1700 (2:463/381.15)
Re: Как обнаружить процесс
From: "Terekhin Alexandr" <didinst [@] rol.ru>
Доброго времени суток, Sergey!
Thu, 2 Dec 2004 14:27:53 +0000 (UTC) Вы писали to Terekhin Alexandr:
TA>> Попробовал сделать через GetWindowText, но ничего хорошего у меня
TA>> не получилось...
TA>> Всё упёрлось в добывание hwnd окон.
TA>> Сделал с EnumWindows обратным вызовом, и жестоко обламался.
TA>> VB ругается на AddressOf а без него безмолвно погибает успев
TA>> добавить в листбокс всего один элемент - свойство caption формы.
SB> Сдается мне, у тебя VB5. Там ИМХО AddressOf еще не придумали. Или,
SB> судя по твоему коду, callback-функция у тебя в коде той же формы,
SB> из которой ты ее вызываешь, а должна быть в отдельном модуле
SB> (именно модуле, *.bas)
Перенёс callback функцию в модуль, но легче от этого не стало.
По прежнему вылетает после выполнения функции.
И почему в FAQ концеренции нет примера на использование AddressOf?
Посоветуйте, что посмотреть..
--
____________________________________________________
Истина где-то рядом, Terekhin Alexandr. E-mail: didinst [@] rol.ru
* Origin: Алт (2:5020/400)
Re: Как обнаружить процесс
From: "Terekhin Alexandr" <didinst [@] rol.ru>
Доброго времени суток, Sergey!
Thu, 2 Dec 2004 14:27:53 +0000 (UTC) Вы писали to Terekhin Alexandr:
TA>> Попробовал сделать через GetWindowText, но ничего хорошего у меня
TA>> не получилось...
TA>> Всё упёрлось в добывание hwnd окон.
TA>> Сделал с EnumWindows обратным вызовом, и жестоко обламался.
TA>> VB ругается на AddressOf а без него безмолвно погибает успев
TA>> добавить в листбокс всего один элемент - свойство caption формы.
SB> Сдается мне, у тебя VB5. Там ИМХО AddressOf еще не придумали. Или,
SB> судя по твоему коду, callback-функция у тебя в коде той же формы,
SB> из которой ты ее вызываешь, а должна быть в отдельном модуле
SB> (именно модуле, *.bas)
Перенёс callback функцию в модуль, но легче от этого не стало.
По прежнему вылетает после выполнения функции.
И почему в FAQ концеренции нет примера на использование AddressOf?
Посоветуйте, что посмотреть..
--
____________________________________________________
Истина где-то рядом, Terekhin Alexandr. E-mail: didinst [@] rol.ru
* Origin: Алт (2:5020/400)