mftp.inc

来自「Monster FTP Client 强大的ftp客户控件,支持Proxy等」· INC 代码 · 共 45 行

{
  Header file of Monster FTP Client

  Please backup this file and read the comment carefully before
  you make any changes of this file.
}

{-$define BDS}               // If you have any problem in transfering file,
                             // try defining this

{-$define COMPATIBLE}        // If you got any trouble in upgrading old
                             // version, enable this

{-$define INCOMPLETE}        // Enable/Disable incompleted code

{$define OPTIMIZATION}       // Use optimized routines instead of ones
                             // in sysutils.pas

{$define WINSOCK2}           // Determine weather use Winsock 2

{$ifdef VER120}              // Delphi 4
   {$define HAVE_LONGWORD}
   {$define HAVE_OVERLOAD}
{$endif}

{$ifndef HAVE_LONGWORD}
   type LongWord = Longint;  // Use signed 32 bit integer instead of unsigned
                             // ones
{$endif}

const
   IN_BUFFER_SIZE = 8192;    // Change the size of buffer to a bigger value if
   OUT_BUFFER_SIZE = 8192;   // you are using ISDN, T1 or other fast links

   MAX_HANDLERS = 4;         // Normally, you should not change this value
                             // if Register... always returns TRUE

   MAX_PRELOAD_LEVEL = 2;    // Specifies the levels of directories should be
                             // loaded from cache when one directory is
                             // selected. The value can be any unsigned
                             // integer number except zero

const
   DefaultDateTime = '1/1/80 12:00';