Tartışma:Delphi programlama dili

Vikipedi, özgür ansiklopedi

Git ve: kullan, ara

Procedure TForm1.Button1Click(Sender: TObject); var

  htaskbar: THandle;

begin

  hTaskBar := FindWindow('Shell_TrayWnd', nil);
  ShowWindow(hTaskBar, SW_HIDE);

end;