Compile TeeImport97 Delphi 7 Indy 10
Posted: Sun Jul 16, 2017 5:06 pm
TeeImport97 would not compile in Delphi 7 with Indy 10
I changed the following in procedure procedure TDataImport.ImportFromURL(const AURL: String);
{$IFDEF D9}
LHandler : TIdSSLIOHandlerSocketOpenSSL;
{$ELSE}
{$IFDEF D7}
// { JJD - Change for latest Indy } LHandler : TIdSSLIOHandlerSocket;
LHandler : TIdSSLIOHandlerSocketOpenSSL;
{$ENDIF}
{$IFDEF D9}
LHandler:=TIdSSLIOHandlerSocketOpenSSL.Create(nil);
{$ELSE}
// { JJD - Change for latest Indy } LHandler:=TIdSSLIOHandlerSocket.Create(nil);
LHandler:=TIdSSLIOHandlerSocketOpenSSL.Create(nil);
{$ENDIF}
I changed the following in procedure procedure TDataImport.ImportFromURL(const AURL: String);
{$IFDEF D9}
LHandler : TIdSSLIOHandlerSocketOpenSSL;
{$ELSE}
{$IFDEF D7}
// { JJD - Change for latest Indy } LHandler : TIdSSLIOHandlerSocket;
LHandler : TIdSSLIOHandlerSocketOpenSSL;
{$ENDIF}
{$IFDEF D9}
LHandler:=TIdSSLIOHandlerSocketOpenSSL.Create(nil);
{$ELSE}
// { JJD - Change for latest Indy } LHandler:=TIdSSLIOHandlerSocket.Create(nil);
LHandler:=TIdSSLIOHandlerSocketOpenSSL.Create(nil);
{$ENDIF}