Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.24;
Скачать: [xml.tar.bz2];




Вниз

Активация программы 


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;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.24;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.051 c
1-75546           Dim2001               2002-01-05 20:34  2002.01.24  
подскажите


6-75630           Yuraz                 2001-10-29 09:30  2002.01.24  
Есть URL сайта, какой командой TCP воспользоваться, чтобы узнать чей он, на кого зарегистр. где, когда..


7-75694           aleXXoft              2001-10-11 12:54  2002.01.24  
PC-speaker & SoundBlaster


1-75598           Masa                  2002-01-06 23:09  2002.01.24  
Помогите написать алгоритм вычисления простых чисел из множества !!!


1-75562           vsu                   2002-01-05 15:00  2002.01.24  
Прокрутка в RichEdit