Sorry for previous mail,
it wasn't mean to be sent at this time :(
i was checking something...
Guillaume MAISON
-
Guillaume MAISON - [EMAIL PROTECTED]
83, Cours Victor Hugo
47000 AGEN
Tél : 05 53 87 91 48 - Fax : 05 53 68 73 50
e-mail : [EMAIL PROTECTED] - Web : http://nauteus.com
--
To un
> the only thing i haven't tested yet is re writing a sample as a service...
>
> i'll do it on monday...
>
Well well well...
i've rewritten the service from the sample app, as it seemed to work nicely...
Results are :
- With a client written for test (that just do Connect/GET/Disconnect) it works
> 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 monda
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;
>>
> > 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:
>> 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
> 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
> Client.DataSt
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
Client.Da
> i would suggest you to download the sample i've provided here
> http://nauteus.com/FTPSample.zip.
> The code in this sample is precisely what doesn't seem to work...
forget about that sample... it'll work...
but the main thing is that in my main server app, when in RETR mode :
10 [2005/05
> 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
well, in that case, the demo for the ftp server has a bad multithreading design.
i'm just using the very same design, and the very same classname ;)
fo
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
>> d
<[EMAIL PROTECTED]>
To: "ICS support mailing"
Sent: Friday, May 20, 2005 5:39 PM
Subject: [twsocket] [HELP] FTP Server possible bug ?
> Le 20 May 2005 à 16:31, Guillaume MAISON a écrit:
>
> > Unless there's something obvious, i don't know why the ftpserver op
Le 20 May 2005 à 16:31, Guillaume MAISON a écrit:
> Unless there's something obvious, i don't know why the ftpserver opens data
> for connection
> though i've set DelayedSend:=True in the OnGetProcessing event ?
After more and more debugging, i've found something :
when saying delayedSend to true
13 matches
Mail list logo