Count: Integer;
The Count property returns the number of the DBMS drivers, supported in the platform.
Sub Main;
Var
Man: IMetabaseManager;
Drivers: IDbDrivers;
Driver: IDbDriver;
i: Integer;
Begin
Man := MetabaseManagerFactory.Active;
Drivers := Man.Drivers;
For i := 0 To Drivers.Count - 1 Do
Driver := Drivers.Item(i);
Debug.WriteLine("Name: " + Driver.Name + "; Identifier: " + Driver.Id + "; Key: " + Driver.Key.ToString);
End For;
End Sub Main;
After executing the example the information about all drivers of the DBMS supported by the platform will be displayed in the development environment console.
See also: