![]() |
|
|
#1
|
||||
|
||||
![]() скрыть:
Код:
var pData: TAppBarData; begin ZeroMemory(@pData, SizeOf(TAppBarData)); pData.cbSize:=SizeOf(TAppBarData); pData.hWnd:=FindWindow('Shell_TrayWnd', nil); pData.lParam:=ABS_ALWAYSONTOP or ABS_AUTOHIDE; SHAppBarMessage(ABM_SETSTATE, pData); end; показать: Код:
var pData: TAppBarData; begin ZeroMemory(@pData, SizeOf(TAppBarData)); pData.cbSize:=SizeOf(TAppBarData); pData.hWnd:=FindWindow('Shell_TrayWnd', nil); pData.lParam:=ABS_ALWAYSONTOP; SHAppBarMessage(ABM_SETSTATE, pData); end; Пишу программы за еду. __________________ |