En la paleta Interbase del delphi tenes el componente TIBDatabaseInfo, que tiene las propiedades ODSMajorVersion y ODSMinorVersion.
Algo como:
Código Delphi
[-]
ShowMessage(Format('%d.%d', [IBDatabaseInfo1.ODSMajorVersion,
IBDatabaseInfo1.ODSMinorVersion]));
Hasta luego.
