project1.dpr

来自「TSecurity提供登陆/注销/修改口令的控件。(有源代码）工作在：D1 D2」· DPR 代码 · 共 18 行

program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  if Form1.Security1.Login then
  begin
    // Application.CreateForm(TForm2, Form2);
    Application.Run;
  end;
end.