How use I the Indy 10 TIdLogFile component ? With Indy 9 it works fine. At Indy 10 te property Intercept doesn't exists. Does anybody have an example?
In the following my Indy 9 source code that works fine:
var
Debug :TIdLogDebug;
FTPClient : TIdFTP;
Debug:= TIdLogDebug.Create(Nil);
Debug.Filename:='c:\temp\debug.log';
Debug.Target:= ltFile;
Debug.Active:= True;
FTPClient:= TIdFTP.Create(Nil);
FTPClient.Intercept:= TIdConnectionIntercept(Debug);
For example I got the following log file:
14.02.2005 12:17:20: Erh.: 220 TESTFTPSERVER Microsoft FTP Service
(Version 5.0).<EOL>
14.02.2005 12:17:20: Gesendet: user ldctest2<EOL>
14.02.2005 12:17:20: Erh.: 331 Password required for ldctest2.<EOL>
14.02.2005 12:17:20: Gesendet: pass 123<EOL>
14.02.2005 12:17:20: Erh.: 230 User ldctest2 logged in.<EOL>
14.02.2005 12:17:20: Gesendet: type I<EOL>
14.02.2005 12:17:20: Erh.: 200 Type set to I.<EOL>
14.02.2005 12:17:20: Gesendet: syst<EOL>
14.02.2005 12:17:20: Erh.: 215 Windows_NT version 5.0<EOL>
14.02.2005 12:17:20: Gesendet: PWD<EOL>
14.02.2005 12:17:20: Erh.: 257 "/" is current directory.<EOL>
How it works with Indy 10 ?
Regards
Markus
