请问设置窗口大小怎么做?

Question

WindowState := wsMaximized;
BorderStyle := bsNone;

Answer 1

procedure TForm1.FormCreate(Sender: TObject);
begin
  Top := 0;
  Left := 0;
  Width := Screen.Width;
  Height := Screen.Height;
  BorderStyle := bsNone;
end;

Answer 2

var
  WindowPlacement: PWindowPlacement;
begin
  New(WindowPlacement);
  WindowPlacement.length := SizeOf(PWindowPlacement);
  GetWindowPlacement(Handle, WindowPlacement);
  {}
  SetWindowPlacement(Handle, WindowPlacement);
  Dispose(WindowPlacement);
end;

Answer 3

将窗体的如下属性改成：
Align = alClient
BorderIcons = []
BorderStyle = bsNone

Answer 4

如果游戏是用DirectX,你不能设置的，可能绝大多数是此类吧
嘻

Answer 5

我不懂，怎么知道他是不是用directx?怎么现在可以自动回信了？

Answer 6

如果游戏支持应该可以吧~~~
按 Alt+Enter 试试~