Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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;


Наверх

Титульная страница Поиск, карта сайта Написать письмо