🚀 go-pugleaf

Bill Cain wrote:
> I am writing an FTP client application that uses TServerSocket(as the 
> data connection) in a thread other than the main VCL thread. 

Do you use TClientSocket for the client part ?

 > The
> ServerType is set to stBlockingThread.

stThreadBlocking ?

> The problem that I am encountering is that the socket does not appear to 
> be accepting data received from a client after connecting to the client. 

Sorry. Servers do not connect to clients. A server can only listen and wait
for connections.

>  Accept and Connection Events are triggered but no Read Event is triggered.

The OnRead event will never be triggered with stThreadBlocking. You have
to actively read from a stream.

> Can you tell me why the TServerSocket is not receiving data?

You did not show code where you tried to read from a stream.

>     DataSocket2->Port = ConvertPortString(PortString);

Pleae supply types. Is DataSocket2 a TServerSocket ? If yes why do
you need 2 ?

>     Command = AnsiString("PORT ") + AnsiString(Addr[0]) +\
>     AnsiString(",") + AnsiString(Addr[1]) +\
>     AnsiString(",") + AnsiString(Addr[2]) +\
>         AnsiString(",") + AnsiString(Addr[3]) + PortString;

We cannot check here the contents of Addr.

>     if(Error = DoTransaction(Command))
>     {
>       return Error;
>     }

We cannot check how you implemented DoTransaction.

>           Writeln(AnsiString("NLST"));//List item names

Ditto.

>           while(Wait) //Wait for LIST responses
>           {
>           }

What is Wait ?

Hans.