菜鸟求救!!!

Question

菜鸟求救!!!
我想在程序启动前进行登录,怎么样才可以使登录窗口比主程序先岀现呢?还有想修改密码,用什么方法实现密码的保存是最常用的方法?

Answer 1

with TLogin.Create(Application) do
try
  ShowModal;
  if 密码正确then
    Application.Createform(主窗口类, 主窗口变量)
  else
    Application.Ter....;
finally
  free;
end;密码可以保存在数据库.

Answer 2

把登陆窗口放DLL里 每次主窗口Create的时候调用

Answer 3

program Project1;uses
  Forms,
  Windows,
  Unit1 in 'Unit1.pas' {Form1};{$R *.RES}
var
  FrmLogon: TForm;begin
  Application.Initialize;
  try
    FrmLogon := TForm.Create(Application);
    FrmLogon.Show;
    FrmLogon.Refresh;
    Sleep(1000);
    Application.CreateForm(TForm1, Form1);
  FrmLogon.Close;
    Application.Run;
  finally
    FrmLogon.Free;
  end;end.
if Understand then
  EverythingIsOK;

Answer 4

我以前都是放在主Form的Show里了，我想反正主Form也就Show一次的，这样可不可以？