1234567891011121314151617181920212223242526272829 |
- program RandomKey;
- uses
- QForms,
- uUserLogin in 'uUserLogin.pas' {frmUserLogin},
- uEnCode in 'uEnCode.pas' {FrmEnCode},
- DESCrypt in 'Public/DESCrypt.pas',
- SQLiteTable3 in 'sqlite/SQLiteTable3.pas',
- SQLite3 in 'sqlite/SQLite3.pas',
- CommTool in 'Public/CommTool.pas',
- uPublic in 'Public/uPublic.pas';
- {$R *.res}
- begin
- Application.Initialize;
- Application.Title := 'Code';
- Application.CreateForm(TfrmUserLogin, frmUserLogin);
- //frmUserLogin.Show;
-
- //FrmEnCode := TFrmEnCode.Create(nil);
- //FrmEnCode.CALC_CODE;
- //FrmEnCode.ShowModal;
- Application.Run;
- end.
|