Moin,
ich habe eine Funktion geschrieben die prüft - bzw prüfen sollte - ob eine Verbindung zum
MySQL-Server besteht.
So sieht sie aus:
Delphi-Quellcode:
function TMySQL.Connected: Boolean;
begin
Result := mysql_ping(FMySQL) = 0;
end;
Nur wird hier eine
AV verursacht. Ich frage mich aber wodurch?
In der Original
mysql-
unit sieht "mysql_ping" so aus:
mysql_ping: function(_mysql: PMYSQL): longint; stdcall;
Jemand ne Ahnung wo der Fehler ist?
mfg
EDIT: Es liegt daran, das man zum pingen verbunden sein muss.... Wie soll man aber prüfen ob eine Verbindung besteht, wenn man dazu verbunden sein muss, wo man sowieso weiss das man connected ist?
Das steht by
mysql:
http://sunsite.mff.cuni.cz/MIRRORS/f...ysql_ping.html
Jemand ne idee wie ich sonst prüfen kann ob eine verbindung besteht?