登录先于主程序启动

[foolboy_hn]

先判断权限，正确则启动程序，否则程序不启动。
也就是说，应在工程文件里Create form，是不是 ？

[Ardus]

可以这么做。即在工程文件里编写代码，先显示登录窗口，然后创建主Form。

[Hank]

打开Project->View Source，会看到以下代码：
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.

然后在Application.Initialize之前调用Create(self)，显示登陆窗口即可，如果密码错，则不运行Application.Run;直接退出。

[bluesky]

如下更改工程文件即可
program Project1;

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

{$R *.RES}

begin
Application.Initialize;
Application.CreateForm(Tpass, pass);
//pass为用户登录窗体
pass.ShowModal;
//用户合法性检查
if pass.user.text<>? or pass.password.text<>? then
application.Exit ;

//以下是启动程序主窗体
Application.CreateForm(TForm1, Form1);

Application.Run;
end.

[Asus]

把登录窗口做成Splash窗口