![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ADO вместо BDE?
mrl © (2002-04-07 16:38:00)Все свою жизнь использовал BDE :) Создовал диструбитивы с помощью InstallShield.
Что нужно если я хочу использовать в своих приложениях доступ к данным через ADO, предположим инсталлировать свое ПО на ПК (чужих) у которых ОС Win9x, Win2000, как проверить есть ли там уже ADO?
если есть то чем и как инсталлировать свое ПО?
если нет как быть?
Киньте ссылку на дельную статью!!! или помогите советом?
С уважением Валентин
sniknik (2002-04-07 18:52:00) [1]не учел :-(. забывать 95 начал. а вот с DOC-ом еще работаю!
Anatoly Podgoretsky (2002-04-07 18:46:00) [2]У других может стоять и 95, так что еще и dcom95.exe
sniknik (2002-04-07 18:29:00) [3]Если делать дистрибутив то достаточно при создании указать что используеш. 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;