TMSWebUpdate - eine neue WebUpdate-Komponente

[fylo]

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.