Has anyone confirmed that? Is it already fixed in the developing branch
of V5/V6?
Just want to ensure it's not forgotten...
/Tobias
Tobias Rapp wrote:
> I just noticed that I'm getting an empty error message (property
> tFtpClient.ErrorMessage) when making an attempt to move a non-existing
> file to the peer with Put().
>
> The problem seems to be that a "SetErrorMessage" statement is missing in
> the TCustomFtpCli.DoPutAppendAsync procedure. In my opinion the
> exception handler code there should look like this:
>
>
> except
> on E:Exception do begin
> FLastResponse := 'Unable to open local file ' +
> FLocalFileName + ': ' +
> E.Message; { V2.101}
> FStatusCode := 426;
> SetErrorMessage; // this line is missing in original ICS-V5
> TriggerDisplay('! ' + FErrorMessage);
> FDataSocket.Close;
> FRequestResult := FStatusCode;
> TriggerRequestDone(FRequestResult);
> Exit;
> end;
> end;
>
> What is your opinion? Needs this to fixed? I'm using the latest ICS V5.
>
> /Tobias
>
--
NOA Audio Solutions Vertriebsges.m.b.H. Tel: +43-1-5452700
Johannagasse 42/4 Fax: +43-1-545270014
A - 1050 Wien Www: http://www.noa-audio.com
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://www.elists.org/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be
