隐藏/显示任务栏的问题
wuxm 2002-10-21 10:30:36 // 隐藏任务栏
procedure TForm1.HideToolBar;
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 TForm1.ShowToolBar;
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;
为什么任务栏是隐藏了,我的窗体却不能充满整个屏幕?怎样解决?