Indy 10 (ICMP und FTP Server) mit Win98?

[zeras]

Habe mal ein kurzes Programm geschrieben, wo nur der ICMP Client drin ist mit Standardwerten.
Unter XP keine Probleme aber bei Win98 kommt immer "Fehler bei Bereichsprüfung", wenn man den Button klickt zum Starten von Ping.
Ein FTP Server läuft aber unter Win98.

Nachfolgend mein Programm.

Host - 192.168.1.11
IPVersion - Id IPv4
Packetsize - 1024
Port - 0
Protocol - 1
ProtocolIPv6 - 50
ReceiveTimeout - 5000

Delphi-Quellcode:

procedure TForm6.Button1Click(Sender: TObject);
begin
  try

    IdIcmpClient1.Ping;

  finally

  end;
end;



procedure TForm6.IdIcmpClient1Reply(ASender: TComponent;
  const AReplyStatus: TReplyStatus);

var
  s     : String;
  FktOK : Boolean;

begin
   s:='Unknown error';


   case AReplyStatus.ReplyStatusType of
    rsEcho:             begin

                          s:=format('response from host %s in %d millisec.',
                           [AReplyStatus.FromIpAddress,
                           AReplyStatus.MsRoundTripTime]);
                        end;

    rsError:            s:='Unknown error';

    rsTimeOut:          s:='Ping time out.';

    rsErrorUnreachable: s:=format('Host %s reports destination network unreachable.',[AReplyStatus.FromIpAddress]);

    rsErrorTTLExceeded: s:=format('Hope %s: TTL expired.',[AReplyStatus.FromIpAddress]);
  end; // case

  Memo1.Lines.Add(s);


end;