Unit Ftptst1

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * Author: François PIETTE Email: francois.piette@ping.be francois.piette@rtfm.be WebSite http://www.rtfm.be/fpiette Copyright: You can use this software freely, at your own risks Creation: Aug 1997 Version: 2.19 Object: Demo for TFtpClient object (RFC 959 implementation) It is a graphical FTP client program Compatible with Delphi 1, 2 and 3 Legal issues: Copyright (C) 1997 by François PIETTE This software is provided 'as-is', without any express or implied warranty. In no event will the author be held liable for any damages arising from the use of this software. Permission is granted to anyone to use this software for any purpose, including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: 1. The origin of this software must not be misrepresented, you must not claim that you wrote the original software. If you use this software in a product, an acknowledgment in the product documentation would be appreciated but is not required. 2. Altered source versions must be plainly marked as such, and must not be misrepresented as being the original software. 3. This notice may not be removed or altered from any source distribution. Updates: Sep 13, 97 Added directory functions. Added button to show how to makes several transferts in one session Sep 27, 97 Change identifiers names to be more standard with other sources Jan 10, 98 Saved edit boxes content to an IniFile, added FileSize, Quote and RestartGet commands Jan 25, 1998 Completely rewritten for new component version (Asynchronous) Feb 02, 1998 V2.17 Added a checkbox to run the synchronous or asynchronous version of the component methods. Feb 15, 1998 V2.18 Removed useless wait unit from the use clause. Added display of winsock information at startup. Feb 22, 1998 V2.19 Added Append and AppendFile commands * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

Classes

TFtpReceiveForm -

Functions

Types

TAsyncCmd
TSyncCmd

Constants

FTPTstVersion
TEMP_FILE_NAME

Variables

FtpReceiveForm


Functions


Types


TAsyncCmd = procedure of object

TSyncCmd  = function : Boolean  of object

Constants

FTPTstVersion = 219

TEMP_FILE_NAME = 'FTPDIR.TXT'


Variables

FtpReceiveForm : TFtpReceiveForm