tftp.dpk

来自「Source code Delphi FTP-server」· DPK 代码 · 共 44 行

DPK
44
字号
package TFTP;

{$R *.RES}
{$R 'FtpSrvr.dcr'}
{$ALIGN ON}
{$ASSERTIONS ON}
{$BOOLEVAL OFF}
{$DEBUGINFO ON}
{$EXTENDEDSYNTAX ON}
{$IMPORTEDDATA ON}
{$IOCHECKS OFF}
{$LOCALSYMBOLS ON}
{$LONGSTRINGS OFF}
{$OPENSTRINGS ON}
{$OPTIMIZATION OFF}
{$OVERFLOWCHECKS OFF}
{$RANGECHECKS OFF}
{$REFERENCEINFO ON}
{$SAFEDIVIDE OFF}
{$STACKFRAMES ON}
{$TYPEDADDRESS OFF}
{$VARSTRINGCHECKS ON}
{$WRITEABLECONST ON}
{$MINENUMSIZE 1}
{$IMAGEBASE $00400000}
{$DESCRIPTION 'FTP server'}
{$IMPLICITBUILD OFF}

requires
  vcl40;

contains
  FtpSrvr in 'FtpSrvr.pas',
  TrdBase in 'TrdBase.pas',
  CntrlTrd in 'CntrlTrd.pas',
  FtpData in 'FtpData.pas',
  FtpObj in 'FtpObj.pas',
  getwrd in 'GetWrd.pas',
  SrvCtrl in 'SrvCtrl.pas',
  Timer in 'timer.pas',
  CBuf in 'Cbuf.pas';

end.

⌨️ 快捷键说明

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