TIdMappedFtp on Indy 10

Giganews Newsgroups
Subject: TIdMappedFtp on Indy 10
Posted by:  Shannon (in…@priya.2y.net)
Date: Sat, 13 Dec 2003

Hey there

I'm trying to upgrade my Indy 9 based application, there was some sort of
bug in the TIdMappedFtp component, after a while it ate all the processor
anyway

in Indy 9 the following code could be used to write to the
OutboundConnection

///-------------------------------------------------------------------------
----
procedure TForm1.mftpOutboundConnect(AThread: TIdMappedPortThread;
  AException: Exception);
var
  ActClient, RecClient: PClient;
begin
  ActClient := PClient(AThread.Data);
  athread.OutboundClient.Writeln('USER '+actclient.Username);  // write to
server
  while pos('331',athread.OutboundClient.ReadLn()) = 0 do
    sleep(1);
  athread.OutboundClient.WriteLn('PASS '+actclient.password);
end;
}
///-------------------------------------------------------------------------
----

What code do I use now with all this new fangled
procedure TForm1.mftp2OutboundConnect(AContext: TIdContext; AException:
Exception);

If anyone could help me here, I'd be most thankfull

Shannon

Replies