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

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

Работа с dbf через ADO

ИМХО ©   (2004-05-30 17:59:00) 

Можно ли открыть dbf-файл с memo-полем (fpt) через ADO (TADOTable)?
Если да, то как именно?

---

sniknik   (2004-05-30 20:55:00) [1]

> Как проверить, установлена ли ADO?
тебе кроме версии нужен еще и jet(необязательно, но по моему лучший вариант для dbf)
проверка обоих, возвращает или версию или ошибку

 function ADO_and_Jet40: String;
 var con: TADOConnection;
 begin
   try
     try
       con:= TADOConnection.Create(nil);
       con.LoginPrompt:= False;
       con.ConnectionString:= 'Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=Text;Data Source=.\';
       con.Open;
       Result:= con.Version;
     except
       on E:Exception do Result:=E.Message;
     end;
   finally
     con.Free;
   end;
 end;


---

YurikGl   (2004-05-30 20:25:00) [2]

Строчки из моего бакалаврского диплома
ADO поставляется в составе широко известных программных средств, таких как Office 2000, Microsoft Internet Explorer 5.0. Кроме того, ADO является непосредственной частью Windows 2000.

---

YurikGl   (2004-05-30 20:20:00) [3]

ИМХО ©   (30.05.04 18:56) [3]

В yandex-е нашел

http://www.delphirus.net.ru/delphi-sovetid-82.html

Узнаём установленную версию ADO


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

// To use this function try something like:
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;

---

ИМХО   (2004-05-30 18:56:00) [4]

Лучше так:

И еще. Если на компе нет MS Access'а, то это же еще не значит, что ADO нельзя будет воспользоваться? Кто отвечает за установку ADO? Как проверить, установлена ли ADO?

---

ИМХО   (2004-05-30 18:53:00) [5]

Имеется в виду, как сформировать строку подключения (для dbf)?

И еще. Если на компе нет MS Access'а, то это ;t еще не значит, что ADO нельзя будет воспользоваться? Кто отвечает за установку ADO? Как проверить, установлена ли ADO?

---

sniknik   (2004-05-30 18:23:00) [6]

открыть, так же как и все остальное. проще всего использовать стандартно DBMemo, а подключается к любому имеющемуся драйверу (тоже стандартно, к dbf в том числе), в любой статье по адо описывается на первой же странице.

---

Наверх