Показать сообщение отдельно
  #9  
Старый 18.09.2011, 06:26
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

PHP код:
SetWindowLong(UWindow, GWL_EXSTYLE, GetWindowLong(UWindow, GWL_EXSTYLE) or WS_EX_LAYERED or WS_EX_TOOLWINDOW);
SetLayeredWindowAttributes(UWindow, 0, 0, LWA_ALPHA);

prev := GetForegroundWindow;
ShowWindow(UWindow, 1);
SetForegroundWindow(UWindow);
ShowWindow(UWindow, 0);

SetWindowLong(UWindow, GWL_EXSTYLE, GetWindowLong(UWindow, GWL_EXSTYLE) and not WS_EX_LAYERED and not WS_EX_TOOLWINDOW); 
сделал возникающее окно невидимым
Вложения
Тип файла: 7z uTor.7z (181.4 Кбайт, 1 просмотров)
Ответить с цитированием