Guillaume MAISON wrote:
The DataStream is nil at that time, try this:
procedure TGetProcessingThread.Execute;
var
aBuf : String;
i : integer;
begin
abuf := 'One ring to rule them all !'#13#10;
Client.DataStream := TMemoryStream.Create;
for i := 0 to 1000 do
The DataStream is nil at that time, try this:
procedure TGetProcessingThread.Execute;
var
aBuf : String;
i : integer;
begin
abuf := 'One ring to rule them all !'#13#10;
Client.DataStream := TMemoryStream.Create;
for i := 0 to 1000 do
Guillaume MAISON wrote:
The DataStream is nil at that time, try this:
procedure TGetProcessingThread.Execute;
var
aBuf : String;
i : integer;
begin
abuf := 'One ring to rule them all !'#13#10;
Client.DataStream := TMemoryStream.Create;
for i := 0 to 1000 do
in my application, i still have that damn RetrDataSent triggered before
RetrSessionConnected...
Have you tried to assign the DataStream in FtpServer1GetProcessing?
DelayedSend := TRUE;
MyClient.FWorkerThread.Client.DataStream := TMemoryStream.Create;
MyClient.FWorkerThread.Resume;
Guillaume MAISON wrote:
in my application, i still have that damn RetrDataSent triggered before
RetrSessionConnected...
Have you tried to assign the DataStream in FtpServer1GetProcessing?
DelayedSend := TRUE;
MyClient.FWorkerThread.Client.DataStream := TMemoryStream.Create;
May be, but try again to make a small demo application that shows the problem
and I'm sure someone will/can help you.
i've tried to redo a sample even using the SQL stuff...
everything runs fine...
the only thing i haven't tested yet is re writing a sample as a service...
i'll do it on
It's just a guess, sounds like your multithreading isn't designed well.
Can you explain your thread design in your own words?
Arno Garrels
Guillaume MAISON wrote:
Le 20 May 2005 à 16:31, Guillaume MAISON a écrit:
Unless there's something obvious, i don't know why the ftpserver opens
data
