Ip Rausfinder?

[deinmeister]

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

[supermuckl]

Zitat:

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

dann sag ich jetzt einfach mal: les tutorials für nubs durch und das mindestens eine woche.

dein http objekt ist noch nicht zur erstellzeit erstellt worden.

ein typischer fall von copy/paste/nixblick/nixfunzt

[JasonDX]

wenn du unter den komponenten-paletten (oben, wo du deine buttons ect. findest) unter "Indy Clients" guckst, findest du die komponente TidHttp
wenn du dir so ein Teil auf dein Formular setzt, dürfts klappen

ansonsten kann ich mich supermuckl anschließen
beschäftige dich ruhig mal mit delphi und seiner umgebung ect. (->tutorials lesen), bevor du progs schreibst, von denen du keine sourcezeile verstehst ;)

[Chegga]

Hi,

[OT]Ändere dein Titel mal bitte um. Z.B. in IP Rausfinder, ohne 1000x ?! :wink: [/OT]
Wenn du Änfanger bist, würde ich allerdings mit anderen Programmen anfangen. :roll:

MfG Marc

P.S.: Herzlich Willkommen in der DP! :dp:

[deinmeister]

aaaaaaaaaaaaaaaaaaaaaaha . . . . .leida gibts Indy... nich... jedenfalls bei meinen komponenten...

[JasonDX]

welches delphi hast du?
im fall dürften die indys frei verfügbar sein (wenn auch ohne source) -> du kannst sie dir irgendwo runterladen und selber installieren.
(bin aber nich sicher, obse wirklich immer frei sind, dürftense aber)

[supermuckl]

sind frei und mit source und für annähernd jedes delphi zu haben

//edit.. doch die indy version ;)

[malo]

Zitat:

Zitat von deinmeister

aaaaaaaaaaaaaaaaaaaaaaha . . . . .leida gibts Indy... nich... jedenfalls bei meinen komponenten...

indy
indy

Oder direkt indy

:roll:

[deinmeister]

mhh hab delphi 7 .... aus der ct...

kurzes fräglein :) wie meinteste das Chimaira

"wenn du dir so ein Teil auf dein Formular setzt, dürfts klappen "

[Chegga]

Hi,

so, jetzt noch mal der direkte Link zum Indy-Download für dich deinmeister:
Link!
Also wenn's jetzt nicht klappt... :roll:

Zitat:

häääääätte man ja auch sagen können das man indy erst ma installn muss :roll:

Das bleibt jetzt mal unkommentiert! :wall:

MfG Marc

Persönlicher Tip: Lern dich wirklich erst in Delphi/Pascal ein,
bevor du einfach irgendwelche Quellcodes kopierst. :wink: