z.b. der hier:
Delphi-Quellcode:
if (IdHTTP1.Get('http://XXX.de/verwaltung/sperrdatei.php') = '') then
begin
IdHTTP1.Get('http://XXXX.de/verwaltung/verwaltung.php?actualUser='+UserName);
Panel2.Visible := false;
Panel1.Visible :=true;
Label1.Font.Color := $000000FF;
Label1.Caption:= 'Die Datenbank wird von ' + IdHTTP1.Get('http://XXXXXX.de/verwaltung/sperrdatei.php') + ' verwaltet!';
B_DBsperren.Enabled := false;
B_DBentsperren.Enabled := true;
end;
Wenn nun keine Inet-Connection besteht bzw. der Server nicht erreichbar ist, schmiert das programm ab...
lg, ghostnw