Y yercomputer Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-16 #3 program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.ShowMainForm :=false; Application.Run; end. 就是他了 Application.ShowMainForm :=false; 给分把
program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.ShowMainForm :=false; Application.Run; end. 就是他了 Application.ShowMainForm :=false; 给分把
K kaida Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-16 #4 在你程序的主窗口的 OnCreate 中写一行: procedure TForm1.FormCreate(Sender: TObject); begin [red]SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);[/red] end;
在你程序的主窗口的 OnCreate 中写一行: procedure TForm1.FormCreate(Sender: TObject); begin [red]SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW);[/red] end;
A ANiDelphi Unregistered / Unconfirmed GUEST, unregistred user! 2006-11-16 #5 procedure TForm1.FormShow(Sender: TObject); begin ShowWindow(Application.Handle, SW_HIDE); end;