RandomKey.dpr 589 B

1234567891011121314151617181920212223242526272829
  1. program RandomKey;
  2. uses
  3. QForms,
  4. uUserLogin in 'uUserLogin.pas' {frmUserLogin},
  5. uEnCode in 'uEnCode.pas' {FrmEnCode},
  6. DESCrypt in 'Public/DESCrypt.pas',
  7. SQLiteTable3 in 'sqlite/SQLiteTable3.pas',
  8. SQLite3 in 'sqlite/SQLite3.pas',
  9. CommTool in 'Public/CommTool.pas',
  10. uPublic in 'Public/uPublic.pas';
  11. {$R *.res}
  12. begin
  13. Application.Initialize;
  14. Application.Title := 'Code';
  15. Application.CreateForm(TfrmUserLogin, frmUserLogin);
  16. //frmUserLogin.Show;
  17. //FrmEnCode := TFrmEnCode.Create(nil);
  18. //FrmEnCode.CALC_CODE;
  19. //FrmEnCode.ShowModal;
  20. Application.Run;
  21. end.