Delphi IP überprüfen - Delphi-PRAXiS

Thema durchsuchen

Ansicht

Themen-Optionen

IP überprüfen

Ein Thema von Illuminator-23-5 · begonnen am 9. Sep 2003 · letzter Beitrag vom 9. Sep 2003

Antwort

Devil

Registriert seit: 9. Sep 2003
8 Beiträge

Re: IP überprüfen

9. Sep 2003, 20:54

du könntest ein TClientSocket verwenden, Address auf die zu überprüfende IP setzen und dann Active auf true setzen. Das ganze in einem try-except-end block verpackt sieht das ganze dann so aus:

markieren

Delphi-Quellcode:

			function IPExist(IP: string): boolean;

begin

  Client.Address := IP;

  try

    Client.Open

    Result := true

  except

    Result := false;

  end;

end;