[S] Möglichkeit IP Verfügbarkeit zu Überprüfen

[hackerkevin]

Hey Leute,

ich hab mit Delphi angefangen und bin zurzeit dabei ein kleines Chat Programm zum Üben zu entwickeln....

Jez wollte ich wissen ob mir einer von euch vllt sagen kann wie man Checkt ob mein Server auf der IPort läuft.... ich poste ebn wofür ichs brauch...

procedure TFrmLogin.BtnLoginClick(Sender: TObject);
var
  i : String;
begin

i:= EdNick.Text;

if i<>'' then

  begin
  FrmChat.ClientSocket.Open; // Hier liegt das Problem.. unten mehr
  FrmLogin.Hide;
  FrmChat.ShowModal;
  end
else
  ShowMessage('Bitte Nicknamen Eingeben!');

end;

Also da er ja den Befehl open kriegt versucht er zuzugreifen... doch wen der Server nicht Online ist kommt eine unschöne Fehler Meldung die ich unterbinden will....

Hier was ich meine:



Hoffe ihr versteht was ich mein und könnt mir helfen...

Ach und mit Exception-Handling gez auch net weil der Fehler ja nicht direkt auftritt...


mfg hackerkevin

[Nec]

Probies doch mal mit dem localhost(127.0.0.1)
Wenn ich dein Problem richtig verstanden habe

[hackerkevin]

ahh danke -tmh- jetzt is die häßliche meldung weg...

try except brauch ich aber dan nicht mehr weil ich nämlich den senden button im dan deaktiviere wen er nicht connectet ist....

mfg hackerkevin