如何实现窗口的全屏化?????

Question

全屏化和最大化是否一样
最大化应设窗体WindowState 为wsNormal

Answer 1

WindowState:=wsMaximized;
borderstyle:=bsNone;

Answer 2

就是想实现窗体无标题栏和边框是吧,用lionheart所说的setwindowlong即可.

Answer 3

就是想实现窗体无标题栏和边框是吧,用lionheart所说的setwindowlong即可.

Answer 4

procedure TForm1.Button1Click(Sender: TObject);
begin
form1.action:=SW_MAXIMIZE; //aciton的取值可见下表
end;
Value Meaning
SW_HIDE Hides the window and activates another window.
SW_MAXIMIZE Maximizes the specified window.
SW_MINIMIZE Minimizes the specified window and activates the next top-level window in the Z order.
SW_RESTORE Activates and displays the window. If the window is minimized or maximized, Windows restores it to its original size and position. An application should specify this flag when restoring a minimized window.
SW_SHOW Activates the window and displays it in its current size and position. 
SW_SHOWDEFAULT Sets the show state based on the SW_ flag specified in the STARTUPINFO structure passed to the CreateProcess function by the program that started the application. 
SW_SHOWMAXIMIZED Activates the window and displays it as a maximized window.
SW_SHOWMINIMIZED Activates the window and displays it as a minimized window.
SW_SHOWMINNOACTIVE Displays the window as a minimized window. The active window remains active.
SW_SHOWNA Displays the window in its current state. The active window remains active.
SW_SHOWNOACTIVATE Displays a window in its most recent size and position. The active window remains active.
SW_SHOWNORMAL Activates and displays a window. If the window is minimized or maximized, Windows restores it to its original size and position. An application should specify this flag when displaying the window for the first time.

Answer 5

setwindowlong,可以实现windows无标题框及边框的特殊效果

Answer 6

设窗体WindowState 为wsNormal 是将专题按normal显示
最大化是：WindowState：=wsMaximized;

Answer 7

用SETWINDOWLONG可实现无边框和无标题栏

Answer 8

我的实现方法不难，但步骤多了点儿。(^_^：我以前用VB也用同种方法实现的。）
procedure TForm1.Button1Click(Sender: TObject);
begin
  form1.BorderStyle:=bsNone;
  form1.Width:=screen.Width;
  form1.Height:=screen.Height;
  form1.Position:=poScreenCenter;
end;