Source position: tcpsocketclient.pas line 15
type TOnSendFileFinished = procedure(
Sender: TObject;
fileName: string;
fileSize: Integer
) of object;