Thema
:
Delphi
Taskleiste Programm verstecken
Einzelnen Beitrag anzeigen
Felix015
Registriert seit: 2. Okt 2008
16 Beiträge
#
10
Re: Taskleiste Programm verstecken
11. Mär 2009, 13:30
Noch ne möglichkeit:
zusammenfalten
·
markieren
Delphi-Quellcode:
procedure
ShowTaskBar;
var
hApp: HWND;
rcApp, rcWork: TRect;
begin
{ get the taskbar
handle
}
hApp := FindWindow('
Shell_TrayWnd
', '
');
if
hApp <> 0
then
begin
{ restore taskbar }
ShowWindow(hApp, SW_RESTORE);
{ set workarea excluding taskbar }
end
;
end
;
und zum verstecken:
zusammenfalten
·
markieren
Delphi-Quellcode:
procedure
HideTaskBar;
var
hApp: HWND;
rcWork: TRect;
begin
{ get the taskbar
handle
}
hApp := FindWindow('
Shell_TrayWnd
', '
');
if
hApp <> 0
then
begin
{ hide taskbar }
ShowWindow(hApp, SW_HIDE);
{ set workarea to full screen }
FullScreenArea;
end
;
end
;
Zitat
Felix015
Öffentliches Profil ansehen
Mehr Beiträge von Felix015 finden