Современные решения

для защиты Windows приложений

и восстановления исходного кода

Обсуждение программирования на Visual Basic в конференции ru.visual.basic


Re: Как обнаружить процесс

Hello, Sergey!
You wrote to 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"

Доброго времени суток, 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"

Доброго времени суток, 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)



Назад Содержание Вперед