ADO вместо BDE?

← →
sniknik (2002-04-07 18:29) [1]

Если делать дистрибутив то достаточно при создании указать что используеш. MDAC нужен в любом случае и Microcoft Jet 4.0 если используеш. Когда работаеш через ODBC то его драйвера и алиасы. И MDAC и Jet можно скачать с Microcoft-а и устанавливать отдельно.

Проверка на установленность (вернет 0 если нет)

function GetADOVersion: Double;
var
ADO: OLEVariant;
begin
try
ADO := CreateOLEObject("adodb.connection");
Result := StrToFloat(ADO.Version);
ADO := Null;
except
Result := 0.0;
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
const
ADOVersionNeeded = 2.5;
begin
if GetADOVersion then
ShowMessage("Need to install MDAC version 2.7")
else
ShowMessage(Format("ADO Version %n, is OK", [GetADOVersion]));
end;

ADO вместо BDE? Найти похожие ветки