|
|
|
|
Как из
программы убрать(скрыть) таскбар, а после завершения программы снова его
восстановить?
»»» oksana - oksana@wtgres.pssr.ru (01.11.00 05:39)
//Спрятать procedure TForm1.Button1Click(Sender: TObject); Var hTaskBar : THandle; begin hTaskbar := FindWindow('Shell_TrayWnd', Nil); ShowWindow(hTaskBar, SW_HIDE); end; //Показать procedure TForm1.Button2Click(Sender: TObject); Var hTaskBar : THandle; begin hTaskbar := FindWindow('Shell_TrayWnd', Nil); ShowWindow(hTaskBar, SW_SHOWNORMAL); end;
С
уважением, Оксана
-= Из конференции сайта MASTERS OF DELPHI
(http://delphi.mastak.com) =-
|
Copyright ©
"Мастера DELPHI" E-mail:
delphi@mastak.com
http://www.delphimaster.ru |
Источник получения информации: http://www.delphimaster.ru
|
|