Forum: Netzwerke
by Thorti,
3. Jan 2011
Hallo Klaus,
Also das Problem lag wie immer im Detail. So wie es aussieht lag es nur an dem "Sch..." try-finally, dass danach das "end" gesetzt werden musste...
Ich danke für die Hilfe
Gruß
Thorsten:thumb:
Forum: Netzwerke
by Thorti,
3. Jan 2011
So das letzte else ganz unten kann man vergessen. Habe grade das Programm bissel geändert und vergessen das zu löschen.
Hab mir überlegt, dass ich mein Problem vielleicht über eine If-Abfrage lösen kann...
Es gibt ja noch die Komponente IdIcmpClient, mit der ich einen Ping simulieren und domit je nach Rückmeldestatus meine Funktion ausführen kann... vielleicht ist das einfacher
Wie ich...
Forum: Netzwerke
by Thorti,
3. Jan 2011
program IPAdresse;
uses
Forms, Windows, SysUtils, Variants,
Classes, StdCtrls, IdBaseComponent,
IdComponent, IdIPWatch,
IdTCPConnection, IdTCPClient,IdIcmpClient,
IdHTTP,IdException, shellAPI, ExtCtrls,
IniFiles;
Forum: Netzwerke
by Thorti,
3. Jan 2011
Der Fehler kommt, wenn ich die Exe ausführe und auch wenn ich vom Programm aus starte... Ich finde kein Römerhelm:-)
Forum: Netzwerke
by Thorti,
3. Jan 2011
Hallo Dirk,
Den Forum Eintrag zum Socket habe ich schon gelesen. Leider bringt der mir nicht viel bei meinem Problem... auch mit den Exceptions klappt es nicht, wenn die Internetverbindung nicht besteht.
Kann aber auch gut sein, dass ich da was falsch gemacht habe...
Noch eine Idee?
begin
ProgDir:=GetCurrentDir();
WPfad:= ProgDir;
Forum: Netzwerke
by Thorti,
3. Jan 2011
Hallo,
ich bin relativ neu auf dem Delphi Gebiet und benötige ein paar professionelle Tipps
Ich habe ein Programm geschrieben, das die Funktion TIDHTTP.Get() nutzt. Hierbei hole ich mir eine Webseite aus dem Internet, die ich dann nach einem bestimmten String durchsuche und ausgebe.
Bei bestehender Internetverbindung funktioniert das Programm ohne Probleme. Kommt es aber zu einem Abbruch der...