Entwickler-Ecke
Internet / Netzwerk - Netzwerkverbindung-exception
mrbug - Mo 05.07.04 08:16
Titel: Netzwerkverbindung-exception
Guten Morgen!
Ich habe folgendes Problem:
Uber einen timer mache ich jede Sekunde einen Query-refresh auf eine Datenbank im Netz. Ich verwende dazu dbexpress-Komponenten (SQLConnection+SQLQuery).Nun möchte eine Fehlerbehandlung mit try...except implementieren, sodass , sobald die Netzwerkverbindung aus irgendeinem Grund unterbrochen wird, eine nachricht ausgegeben wird.
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
| procedure TForm1.Timer1Timer(Sender: TObject);
begin
if chkbx_zyklisch.Checked then //nur wenn ich das auch will...
begin
ZeitStart(Self);
try
DataModule1.SQLQuery1.Refresh;
except
ShowMessage('Verbindung verloren!');
end;
ZeitStop(Self);
edt_RefreshZeit.Text := IntToStr(LaufZeit);
Ausgabe_Edit_Felder(Self);
end;
end; |
Leider funktioniert das in dieser Form nicht. Ziehe ich das LAN raus, erscheint folgende Fehlermeldung:
Error der Klasse EcwbError, Meldung 'cwbDB_Fetch returned error code 6053'...
:(
Hat jemand eine Idee??
Markus
MAlsleben - Di 06.07.04 08:37
Hi,
startest Du das Programm von Delphi aus?
Gruß Micha.
mrbug - Di 06.07.04 15:45
ja so ists
MAlsleben - Mi 07.07.04 11:35
Hi,
wenn Du das Programm aus Delphi heraus startest, läuft automatisch der Delphi interne Debugger mit. Deswegen bekommst Du auch die Fehlermeldung, die Du eigentlich unterdrücken willst. Startest das Programm außerhalb von Delphi, dann sollte das so wie Du willst funktionieren, würde ich zumindest auf den ersten Blick sagen.
Gruß Micha
mrbug - Do 08.07.04 11:06
Dankeschön. Ich werds mal probieren!
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!