Thema: Delphi Ip Rausfinder?

Einzelnen Beitrag anzeigen

deinmeister

Registriert seit: 15. Jan 2005
21 Beiträge
 
#1

Ip Rausfinder?

  Alt 15. Jan 2005, 17:14
Ok... erstmal hallo.....

Und nun zum Problem , alsooooooo ich bin ein Nub.... und wollte als erstes Programm einfach mal einen IP Rausfinder machen der die IP angibt(die ausm Inet) hab hier im forum auch einen schönen quelltext gefunden.....
dann habe ich die oberfläche zusammengewurschtelt und einen button gemacht der mir dann die ip angeben soll.....

hier ist erstmal der code vom button.....

Code:
procedure TForm1.Button1Click(Sender: TObject);
  function GetIPAdress: string;
var
  s: string;
begin
  try
    s:=idhttpl.Get('http://gekmihesg.i-networx.de/ip.php');
    result:=trim(copy(s,pos('Your IP: ',s)+9,15));
    if result = '' then
      result:='0.0.0.0';
  except
    result:='0.0.0.0';
  end;
end;
end;

end.
..... aba wenn ich das prog nun compiliern will kommt der mit dem fehler das er "idhttpl" als undefinierten bezeichner bezeichnet und nich weitermachen will.... nun meine frage.... WARUM? und WIE GEHT ES WEG?....

bitte nehmt rücksicht darauf das ich mich seit 10min mit delphi beschäftige


ps: muss da noch was hin wie z.b. showmessage?.... also ich hab da aufn ersten blick nix gefunden wo die ip dann ausgegeben wird... nich das da prog die dann für sich behält
  Mit Zitat antworten Zitat