Форум: "Базы";
Текущий архив: 2004.06.27;
Скачать: [xml.tar.bz2];

Вниз

Работа с dbf через ADO   Найти похожие ветки 

← →
ИМХО ©   (2004-05-30 17:59) [0]

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

---

← →
sniknik ©   (2004-05-30 18:23) [1]

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

---

← →
ИМХО ©   (2004-05-30 18:53) [2]

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

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

---

← →
ИМХО ©   (2004-05-30 18:56) [3]

Лучше так:

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

---

← →
YurikGl ©   (2004-05-30 20:20) [4]

ИМХО ©   (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;

---

← →
YurikGl ©   (2004-05-30 20:25) [5]

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

---

← →
sniknik ©   (2004-05-30 20:55) [6]

> Как проверить, установлена ли 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;


---

Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2004.06.27;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.032 c