ArchiverEditD.dpr 480 B

123456789101112131415161718192021
  1. program ArchiverEditD;
  2. {$R 'icons.res' 'icons.rc'}
  3. uses
  4. Forms,
  5. fdArchiveEdit in 'fdArchiveEdit.pas' {Form1},
  6. fdFolderDlg in 'fdFolderDlg.pas' {FDialog},
  7. fdFolderSelect in 'fdFolderSelect.pas' {FolderSel};
  8. {$R *.res}
  9. {.$R Icons.res}
  10. begin
  11. Application.Initialize;
  12. Application.CreateForm(TForm1, Form1);
  13. Application.CreateForm(TFDialog, FDialog);
  14. Application.CreateForm(TFDialog, FDialog);
  15. Application.CreateForm(TFolderSel, FolderSel);
  16. Application.Run;
  17. end.