Source position: ftpclient.pas line 14
type TOnFTPClientUploadFinished = procedure(
Sender: TObject;
remotePath: string;
success: Boolean
) of object;