• Yeni Üyelik
  •     
  • K.Adı yada E-Posta :
  •      
  •      
End of Article
27 HAZİRAN

DELPHI - 7 - Taskbarı Gizlemek

0 Yorum
Ekleyen: seasparrow 27 Haziran 2005 Okunma: 895
27 Haziran 2005
Yazdır

Taskbar gizleme
procedure hideTaskbar;
var
wndHandle : THandle;
wndClass : array[0..50] of Char;
begin
StrPCopy(@wndClass[0], 'Shell_TrayWnd');
wndHandle := FindWindow(@wndClass[0], nil);
ShowWindow(wndHandle, SW_HIDE);
end;

procedure showTaskbar;
var
wndHandle : THandle;
wndClass : array[0..50] of Char;
begin
StrPCopy(@wndClass[0], 'Shell_TrayWnd');
wndHandle := FindWindow(@wndClass[0], nil);
ShowWindow(wndHandle, SW_RESTORE);
end;