核心提示:procedure TForm1.FormCreate(Sender: TObject);var ExSty:DWORD;begin ExSty:=GetWindowLong(Handle,GWL_E...
procedure TForm1.FormCreate(Sender: TObject);
var
begin
end;
试试,在Win2000\XP下有效果.
procedure TForm1.FormCreate(Sender: TObject);
var
begin
end;
试试,在Win2000\XP下有效果.