关于启动窗体,大家请进!??

Question

我想在参数里自定义设置启动窗体,在程序启动时怎样实现!
在工程属性的 Auto-Ctreate-Forms里是不是要把这些设置为启动窗体放在里面,请问大家要怎样实现!

Answer 1

procedure TFrm_Ctrol.FormCreate(Sender: TObject);
begin
  try
    Frm_login:=TFrm_login.create(self);
    Frm_login.ShowModal;
  finally
    freeandnil(Frm_login);
  end;
end;

Answer 2

还有怎样让一个exe和另一个exe操作同步,比如一个exe最小化另一个exe也最小化,最大化同之,关闭也一样

Answer 3

用自定义消息，然后用sendmessage发送到另一个EXE中

Answer 4

什么启动窗体？下面是出现欢迎窗体，不知道搂住说的是不是这个
---------------------------------------------------------
program Project1;uses
  Forms,SysUtils,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2};{$R *.res}
var welcomeForm:TForm2;
begin
  welcomeForm:=TForm2.Create(nil);  
  welcomeForm.Show;
  welcomeform.Update;   //如果窗体内有图片文字，必须有这一举
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  sleep(2000);
  welcomeForm.Close;
  Application.Run;
end.