Цитата:
|
По кнопке (там, где ShowMessage стоит) тебе надо проделать операцию, обратную к отправлению в трей с соответсвующим приложением. Ты, когда в трей приклад отправляешь, сохрани его хэндл. И потом по этому хэндлу поднимай из трея...
|
Если вы об этом:
Код:
...
HTD:= FindWindow(nil, 'Записки' );
...
procedure TrayMessage(var Msg: TMessage);
begin case Msg.lParam of WM_LBUTTONDOWN: begin ShowMessage('Left button clicked - let''s SHOW the Form!');
ShowWindow(HTD, SW_SHOW); end;
WM_RBUTTONDOWN: begin ShowMessage('Right button clicked - let''s HIDE the Form!');
ShowWindow(HTD, SW_HIDE); end; end; end;
...
то это не работает не работает.
Вот я и теряюсь, может я не правильно описываю процедуру?