окно на переднем фоне
Змей © (2006-01-16 18:31:00)
пользуюсь компонентой RxTrayIcon
когда форма скрыта(form1.hide) и на раб столе висит окно
любой открытой папки пусть(D:\SOFT) и нажимаю в трее на иконку
своей проги то окно проги должно вылететь(form1.show) но оно
вылетает на задний план за окном папки. как исправить это?
на form1.showmodal ошибка вылетает!
СПАСИБО!
M_A (2006-01-19 19:28:00) [1]
сделать поиск окна и вынести на передн. план
procedure TForm1.ApplicationRestore(Sender : TObject);
var
handle1:HWND;
begin
ShowWindow(Application.Handle, SW_hide);
Handle1 := FindWindow('TForm1',nil);
SetForegroundWindow(Handle1);
end;
Наверх 
ЧАТ |
Орешник |
|
