Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.01.24;
Скачать: CL | DM;

Вниз

Активация программы   Найти похожие ветки 

 
Leviathan ©   (2001-12-29 02:07) [0]

Приложение деактивировано, нужно, чтобы при щелче на трей-иконку оно активировалось и вылезло на первый план.


 
Suntechnic ©   (2001-12-29 04:40) [1]

ShowWindow(Application.Handle, SW_RESTORE);


 
RaZEr ©   (2001-12-29 06:39) [2]

Ну или SetForegroundWindow(MainWnd.Handle);


 
Хлор ©   (2002-01-08 06:42) [3]

Вот шматок смотри может пригодиться:

procedure TForm1.IconTray (var Msg: TMessage);
var
Pt: TPoint;
begin
if Msg.lParam = wm_rbuttondown then
begin
GetCursorPos (Pt);
PopupMenu1.Popup (Pt.x, Pt.y);
end;
if Msg.lParam = WM_lBUTTONDBLCLK then
begin
ShowWindow(Application.Handle, SW_RESTORE);
end;
end;



Страницы: 1 вся ветка

Текущий архив: 2002.01.24;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.008 c
1-75602
~Alice~
2002-01-07 20:48
2002.01.24
тут еще вопрос про написание сервисов для nt


3-75499
Polevi
2001-12-17 11:36
2002.01.24
GUID


3-75520
NewComer
2001-12-19 16:46
2002.01.24
Ничего не понимю...


14-75679
Андрей
2001-11-30 18:54
2002.01.24
Лицензия на Delphi


1-75615
swr
2002-01-08 10:26
2002.01.24
меню Project/Resourses в Delphi IDE