Unit FreeFtp |
Renamed from FTP.pas 6/14/1998 Paul Rice to avoid conflicts with others' work. TStarFtp- Internet FTP Component for Delphi Copyright (©) 1997 Tony BenBrahim This library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License for more details. You should have received a copy of the GNU Library General Public License along with this library; if not, write to the: Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. 1.3 first stable release of FTP 9/13/95 1.3.1 lets server disconnect on Access Denied non fatal if SYST is not supported 2/13/96 1.3.2 removed extraneous ftpReady on Quit fixed InitialDirectory 3/6/96 1.3.3 Delphi 2.0 version! 3/16/96 1.3.4 increased efficiency of data routines eliminated race condition for small files and Ready by adding ReadySynch; 3/24/96 1.4.0 added FTPURLDialog in same file 4/14/96 1.4.1 made TransferTime property correct throughout transfer, not just at end. 5/11/96 1.4.2 added timeout properties to TFtp error on RETR is no longer fatal (as per documentation) fixed premature disconnect (again :-( StopTransfer function now works. Error handling reaaranged.
Classes |
FtpURLDialog -
FtpURLDialogEditor -
TFtpudlg -
TFtpURLDialogCE -
TStarFtp -
Functions |
FTPExtractLast -
ParseListingLine - n is 0 based
Types |
FtpError
FtpInfo
FtpURLDialogObjects
TFtpErrorEvent
TFtpInfoEvent
TFtpInfoNeeded
TFtpInfoNeededEvent
TFtpLastAction
TFTPServerType
TFtpURLAction
TFtpURLDialogOptions
TFtpURLDialogPos
TNewLineProc
TTransferType
TURLProc
Constants |
FTP_AVAILABLE
FTP_ERROR
FTP_READY
WM_Proceed
Variables |
Functions |
Types |
FtpError=(ftpNone,ftpWInsockNotInitialized,ftpNetworkDown,ftpInvalidAddress,ftpInternalError, ftpGeneralWinsockError,ftpConnAborted,ftpConnReset,ftpConnectTimeOut, ftpOutofSockets,ftpNetworkUnreachable,ftpAddressNotAvailable, ftpConnectionRefused,ftpProtocolError,ftpCanceled,ftpUnknown, ftpAddressResolutionError,ftpPrematureDisconnect, ftpHostUnreachable,ftpNoServer,ftpBadURL, ftpFileOpen,ftpFileWrite,ftpFileRead,ftpFileNotFound, ftpTimeOut,ftpServerDown,ftpAccessDenied,ftpDataError);
FtpInfo= (ftpServerConnected,ftpServerDisconnected,ftpResolvingAddress,ftpAddressResolved, ftpTraceIn,ftpTraceOut,ftpAlreadyBusy, ftpDataTrace,ftpReady,ftpTransferDone,ftpDirectoryRefresh, ftpLoggedIn,ftpFileSize,ftpPermissionDenied,ftpListing,ftpStartListing, ftpStoringFile,ftpGettingFile,ftpDeleting);
FtpURLDialogObjects=(StatusText,StatusBar,ByteCounter,CancelButton);
TFtpErrorEvent = procedure (Sender : TObject; error: FtpError; addinfo: string) of object
TFtpInfoEvent = procedure (Sender : TObject; info: FtpInfo; addinfo: string) of object
TFtpInfoNeeded=(niHost,niUser,niPassword,niAccount);
TFtpInfoNeededEvent = procedure (Sender :TObject;need: TFtpInfoNeeded;var value: string) of object
TFtpLastAction=(ftplaNONE,ftplaLOGIN,ftplaCWD,ftplaMKD,ftplaRMD, ftplaRM,ftplaGET,ftplaPUT,ftplaLIST,ftplaREN, ftplaGETS,ftplaPUTS,ftplaRMS);
TFTPServerType=(ftpstDefault,ftpstAutoDetect,ftpstUNIX,ftpstULTRIX,ftpstU5000,ftpstSINTFTPD, ftpstVmsMultinet,ftpstVmsUcx,ftpstMVS,ftpstMacFtpd,ftpstClix,ftpstQVT, ftpstNCSA,ftpstChameleon,ftpstVM,ftpstVMVPS);
TFtpURLAction=(fd_GetURL,fd_PutURL,fd_ListURL);
TFtpURLDialogOptions=set of FtpURLDialogObjects
TFtpURLDialogPos=(ScreenCenter,Custom);
TNewLineProc=procedure(line:string) of object
TTransferType=(BinaryTransfer,AsciiTransfer);
TURLProc=procedure of object
Constants |
Variables |