(Gast)
n/a Beiträge
|
Die Uhr im Tray Ein- und wieder Ausschalten
30. Jan 2003, 18:28
Ausschalten:
Delphi-Quellcode:
procedure TForm1.Button5Click(Sender: TObject);
begin
ShowWindow(FindWindowEx(FindWindowEx(FindWindow('Shell_TrayWnd', nil),
0, 'TrayNotifyWnd', nil), 0, 'TrayClockWClass', nil), SW_HIDE);
end;
Einschalten:
Delphi-Quellcode:
procedure TForm1.Button5Click(Sender: TObject);
begin
ShowWindow(FindWindowEx(FindWindowEx(FindWindow('Shell_TrayWnd', nil),
0, 'TrayNotifyWnd', nil), 0, 'TrayClockWClass', nil), SW_SHOW);
end;
Grüsse, Daniel
|
|
Zitat
|