怎么把窗体上的蓝色的那个控制栏去掉?(50分)

  • 主题发起人 主题发起人 zouwenyan
  • 开始时间 开始时间
Z

zouwenyan

Unregistered / Unconfirmed
GUEST, unregistred user!
成为一种无上面的那蓝色的窗体,叫什么来着我也说不清了:(,不过好着急的。。
 
是不是没有标题栏的窗体啊?
SetWindowLong(Self.Handle,
GWL_STYLE,
GetWindowLong(Handle,GWL_STYLE) and not WS_CAPTION);
Height := ClientHeight;
 
Form1.BorderStyle := bsNone;
 
对亚,form.borderstyle:=bsnone
 
同意楼上的.
 
procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong(Self.Handle,GWL_STYLE,GetWindowLong(Handle,GWL_STYLE) and not WS_CAPTION);
end;
 
两者任选其一。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
I
回复
0
查看
544
import
I
后退
顶部