Eingesetzte Firebirdversion ermitteln

[erich.wanker]

Hallo Leute,

Um zu testen, ob Firebird läuft, versuch ich eine kleine testconnection (nur localhost).
Wenn ich connected bin, würd ich gerne herausfinden, welche Firebird-Version eingesetzt wird.
Hab mich schon gefreut, als ich bei TZConnection "ServerVersionStr" gefunden hab - aber das liefert immer 0.0.0 zurück ?

Wenn ich via Zeos eine Verbindung aufbaue, müsste es doch möglich sein, die Firebirdversion auszulesen?

Vielen Dank

Erich

Delphi-Quellcode:

exepfad:=extractfilepath(application.ExeName);

zconnection1.Database:=exepfad+'\connect.dat';
zconnection1.User:='SYSDBA';
zconnection1.Password:='masterkey';

zq:=0;   // 0 = alles im Ar%%h    1 = alles in Butter
try
zconnection1.Connect;
showmessage(zconnection1.ServerVersionStr);  //liefert immer '0.0.0'
zconnection1.Disconnect;
zq:=1;
except
zq:=0;
end;