Zitat von
Marco Steinebach:
...diesem Indy9 Indy10 blödsinn!
Hallo Marco,
ich hab mir mal den Quellcode angeschaut und ihn wie folgt geändert:
Delphi-Quellcode:
unit WebUpdateThread;
{$i WebUpdate.inc} // hier das Indy-Def gelöscht
{$i IdCompilerDefines.inc} // hier wird die Indy Version definiert
// Indy 9 = INDY90 und Indy 10 = INDY100 !
procedure InternalOnWork(Sender: TObject; AWorkMode: TWorkMode;
{$IFDEF INDY100}
AWorkCount: Int64
{$ELSE}
const AWorkCount: Integer
{$ENDIF}
);
Die gleiche Änderung natürlich auch noch bei der Procedure selbst. Mit diesen Änderunge compiliert mein Delphi 7 (mit
Indy 10) den Code ohne Probleme.