Delphi - BDE verzió szám lekérdezés programból

forráskód letöltése
Ebből a példaprogramból megtudhatjuk, hogy miként állapítható meg az, hogy a BDE milyen verziószámmal fut az adott számítógépen, illetve, hogy egyáltalán telepítve van-e a gépre. Ennek megvalósítására egy direct BDE hívásra van szükség a DbiGetSysVersion függvény személyében. Egyetlen paramétere egy SYSVersion struktúra, melyet feltölt a függvény a megfelelő értékekkel.

Így például a verzió számot az iVersion mezőjéből tudhatjuk meg. Ha itt például 500-at kapunk eredményül az azt jelenti, hogy az 5.0-s verziójú BDE van a gépen.

A BDE készítési dátuma szintén innen tudható meg, csupán a dateVer mezőt kell megkérdeznünk. Itt viszont szükség van némi konverzióra, hogy számunkra is olvasható dátum váljon az adatból.

Ha a DbiGetSysVersion függvény hívás sikertelen, akkor ez annak tudható be, hogy a BDE nincs telepítve még a gépre.