Das würde mir dazu einfallen aber ist es auch ok
Delphi-Quellcode:
try
btnVerbinden.Font.Color := clRed;
btnVerbinden.Caption := 'bitte warten...';
IdHTTP1.Get(sURL);
except
MessageDlg('Verbindung fehlgeschlagen', mtError, [mbOK], 0);
btnVerbinden.Font.Color := clBlack;
btnVerbinden.Caption := 'Verbinden';
end;//try
Ich denke das dies mit try except so hinhaun müsste falls die Seite nicht erreichbar ist kommt halt die Fehlermeldung oder gibt es noch eine bessere Lösung?