G goodfriend1 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-21 #3 将窗体的BorderIcons的biSystemMenu设置为FALSE试试.
G gun_zf Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-21 #6 1、把窗体BorderStyle属性该为:bsNone 2、在窗体中放置一个panel,设置panel的align属性为alclint,再设置边框属性。 其余的东西就放在panel上。
Q QuickSilver Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-21 #7 procedure TForm1.FormCreate(Sender: TObject); begin SetWindowLong(Handle,GWL_STYLE,GetWindowLong(Handle,GWL_STYLE) AND NOT WS_CAPTION); ClientHeight:=Height; end;
procedure TForm1.FormCreate(Sender: TObject); begin SetWindowLong(Handle,GWL_STYLE,GetWindowLong(Handle,GWL_STYLE) AND NOT WS_CAPTION); ClientHeight:=Height; end;