Re[3]: как узнать
От: dania  
Дата: 18.03.06 05:31
Оценка:
Здравствуйте, CR-LF, Вы писали:

>> CL>Вопрос: как эта первая копия может узнать, что его отобразили с помощью

>> CL>ShowWindow ?
>> неверный способ обнаружения уже запущенной копии
CL>С чего ты взял ?
CL>Я кажется вообще не показывал каким образом я это делаю.
Ты это паказал... показал основновную свою функцию.
Вот посмотри на примере. Может перенесёшь. Или Будет полезно.

var
ReturnParam :boolean;
begin
ReturnParam:=false;
StartTimer.Enabled:=false;
WinExec('DBCS.exe GHH-JGHG-HJGH',0);
repeat
Application.ProcessMessages();
if (FindWindow('TPasswordForm','Ограничение доступа "База Данных XXXX" 1.0 (SoftWare Building 2002)') <> 0)
then
begin
ReturnParam:=true;
end;
until (ReturnParam = true);
Close();
end;
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.