Скачать: CL | DM;

Помогите начинающему, как программно создать DBF файл   Найти похожие ветки 

← →
Ali2002 ©   (2002-11-13 13:29) [0]

Мастера помогите как программно создать DBF файл.
Делаю, как в книге Фаронова не работает, создает файл типа Paradox? а не Dbase ? подскажите как сделать.

tb8.active:=false;
tb8.DataBaseName:="f8";
tb8.TableName:="da010601.dbf";
tb8.tabletype:=ttDBASE;

if not tb8.Exists then begin
with tb8 do begin
tb8.CreateTable;
tb8.Active:=true;
end;
end;

---

← →
John13   (2002-11-13 13:47) [1]

Он у тебя создает DB-файл или DBF, но Paradox`овский?

---

← →
Ali2002 ©   (2002-11-13 14:39) [2]

Пишет расширение DBF, пытаюсь просмотреть с помощью FoxPro пишет не могу открыть файл, формат не DBF, в чем причина ?

---

← →
REP   (2002-11-13 14:47) [3]

Попробуй tb8.tabletype:=ttFoxPro
или уменьши в BDE Administrator`e в Cofiguration\Drives\Native\DBase Level=3 (можно 4)
Вроде Foxpro 2.6 выше не понимает.

---

← →
vvm   (2002-11-13 15:30) [4]

with tbl do
begin
Close;
DatabaseName := pathDir;
TableType := ttDBase;
TableName := "FILE1.DBF";
Exclusive := False;
with FieldDefs do
begin
Clear;
with AddFieldDef do
begin
Name := "FIELD1";
DataType := ftInteger;
end;
with AddFieldDef do
begin
Name := "FIELD2";
DataType := ftString;
Size := 50;
end;
with AddFieldDef do
begin
Name := "FIELD3";
DataType := ftCurrency;
end;

end;
CreateTable;
end;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: -0.985 c