⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 zipp.dpr

📁 Delphi 6 Installation instructions for the Registered Source Code version of VCLZip:
💻 DPR
字号:
program zipp;

uses
  Forms,
  Zip in '\KPGB\DEMO\EXAMPLES\ZIPUTIL\ZIP.PAS' {VCLZipForm},
  IncZip in '\KPGB\DEMO\EXAMPLES\ZIPUTIL\INCZIP.PAS' {IncompleteZipDlg},
  Ovrwrite in '\KPGB\DEMO\EXAMPLES\ZIPUTIL\OVRWRITE.PAS' {OverwriteDlg},
  Extract in '\KPGB\DEMO\EXAMPLES\ZIPUTIL\EXTRACT.PAS' {ExtractDlg},
  Compress in '\KPGB\DEMO\EXAMPLES\ZIPUTIL\COMPRESS.PAS' {CompressDlg},
  Config in '\KPGB\DEMO\EXAMPLES\ZIPUTIL\CONFIG.PAS' {ConfigDlg},
  Comment in '\KPGB\DEMO\EXAMPLES\ZIPUTIL\COMMENT.PAS' {CommentEditor},
  ModInfo in '\KPGB\DEMO\EXAMPLES\ZIPUTIL\MODINFO.PAS' {ModInfoForm},
  InvPwd in '\KPGB\DEMO\EXAMPLES\ZIPUTIL\INVPWD.PAS' {InvalidPwdDlg};

{$R *.RES}

begin
	{$IFDEF WIN32}
	Application.Initialize;
	{$ENDIF}
  Application.Title := 'VCLZip Zip Utility';
  Application.CreateForm(TVCLZipForm, VCLZipForm);
  Application.CreateForm(TOverwriteDlg, OverwriteDlg);
  Application.CreateForm(TExtractDlg, ExtractDlg);
  Application.CreateForm(TCompressDlg, CompressDlg);
  Application.CreateForm(TConfigDlg, ConfigDlg);
  Application.CreateForm(TCommentEditor, CommentEditor);
  Application.CreateForm(TModInfoForm, ModInfoForm);
  Application.CreateForm(TInvalidPwdDlg, InvalidPwdDlg);
  Application.Run;
end.

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -