MySQL 5 Lost Connection

[TKindermann]

Hallo zusammen,

ich habe folgendes Problem:

Mein Programm schaltet sich beim start auf eine MySQL-Datenbank auf.

Connect klappt alles i.O.

Wenn die SQL-Datenbank aber auf irgendeinem Grunde nicht mehr erreichbar ist bekomme ich die Fehlermeldung:

Error.. Lost Connection to MySQL server...

Wie kann ich diesen Fehler im Programm sinnvoll abfangen, damit ich darauf reagieren kann.

Ich habe bereits folgendes versucht.

Code: Alles auswählen

try
    SQLQuery.Active   := True;
  except
    on e: Exception do
      begin
        fMain.Close;
      end;
  end;

hat aber leider nicht geholfen...

Viele Grüße
Thomas

[Displaced]

Die Komponenten haben doch nen BeforeDisconnect und AfterDisconnect Event. Da kannste das eigentlich abfangen.

[TKindermann]

Werden diese Events nicht nur beim 'reguläre' disconnect - sprich vom Programm aus- ausgeführt?

[Thomas B.]

Standardmäßig wird vom MySQL-Server die Verbindung zu den Clients nach einer einstellbaren Zeit getrennt.
Von Client-Seite lässt sich das so umgehen:

Code: Alles auswählen

If fMySQLConn.Connected then mysql_options(fMySQLConn.Handle,MYSQL_OPT_RECONNECT,'true');

Gruß Thomas B.