怎样让窗口全屏,看不到标题栏的那种!

Question

BorderStyle:=bsNone;
width:=screen.Width;         //让窗体全屏幕显示
height:=screen.Height;
 Position:=poScreenCenter;放到from的Create里头

Answer 1

to:xueyin
但是windows的任务栏还在里面呀,那个也不要,怎样搞分是你的!!

Answer 2

api函数可以的，具体我也记不清了，你查一下吧

Answer 3

//隐藏任务栏
Var
hWnd : Integer;
begin
hWnd := FindWindow('Shell_TrayWnd', '');
If hWnd <> 0 then
ShowWindow(hWnd, SW_HIDE);BorderStyle:=bsNone;
width:=screen.Width;        //让窗体全屏幕显示
height:=screen.Height;
Position:=poScreenCenter;
end;