There are two errors in your program:
1) You forgot to assigned ClientClass property and nevertheless you are
using your own class TMyClient. This error cause the AV you noticed. It also
caused the casting error you noticed:
// GM 16.05.2005 : below is commented else i have an object typecasting
error at runtime
// MyClient := Client as TMyClient;
MyClient := TMyClient(Client);
To fix this error, add the line below just before starting the server.
FtpServer1.ClientClass := TMyClient;
2) You neglected to create tha DataStream in your thread Execute method. Add
the line:
Client.DataStream := TMemoryStream.Create;
--
[EMAIL PROTECTED]
http://www.overbyte.be
----- Original Message -----
From: "Guillaume MAISON" <[EMAIL PROTECTED]>
To: "ICS support mailing" <twsocket@elists.org>
Sent: Monday, May 16, 2005 12:05 PM
Subject: Re: [twsocket] [HELP] FTP Server w/ client disconnection...
> > Can you make a stripped down version of your program available for
download
> > somewhere, just enough (source code only) to reproduce the problem ?
>
> http://nauteus.com/ftpserver.zip (2 535 bytes)
>
> execute, clic the start button (default port 2222),
> launch a ftp client, get a file named images and then disconnect.
>
> there's an exception at the disconnection and at the server closing.
>
> thanks for your help !
>
> 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 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
>
--
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
