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

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

Ошибка при открытии dbf файлов [D6, dBase, FoxPro]


Young_01 ©   (2003-01-08 16:08:00) 

Уважаемые мастера, помогите пожалуйста разрешить один вопрос. Программным способом создаю базу (код представлен ниже), а при открытии dbf просмотарщиками (в том числе и DataBase Desktop) выдается ошибка unable to open table. Настройки BDE DBASE драйвера следующие:

Level 4.0
MDX Block Size 1024
MEMO FILE BLOCK SIZE 1024



...
var
taRing:tTable;
begin
taRing:=tTable.Create(Application);
taRing.DataBaseName:= path;
taRing.TableName:= "ring_"+toDayMonth+".dbf";
taRing.TableType:= ttDBASE;

with Dm.taRing do
begin
FieldDefs.Clear;
FieldDefs.Add("TELEFON",ftString,10,true);
FieldDefs.Add("ABONENT",ftString,30,true);
FieldDefs.Add("DATE",ftDateTime,0,false);
FieldDefs.Add("TIME",ftDateTime,0,false);
FieldDefs.Add("TYPE",ftInteger,0,true);
FieldDefs.Add("PASS",ftInteger,0,false);
FieldDefs.Add("DOLG",ftFloat,0,true);
CreateTable;
end;
Dm.taRing.Open;
end;
...


Anatoly Podgoretsky   (2003-01-08 16:46:00) [1]

Недостаточно информации, могу сказать, что у других не выдает


young_01   (2003-01-08 16:38:00) [2]

спасибо работает
у меня еще один вопрос почему если я ставлю в настройках BDE DBASE параметр Level = 25 Delphi выдает генерирует ошибку


Anatoly Podgoretsky   (2003-01-08 16:25:00) [3]

1. FieldDefs.Add(,,, true);

dBase IV не поддерживает Requiredи еще одно замечание, в хелпе сказано "Add is provided for backward compatibility."

2. FieldDefs.Add("DATE", ftDateTime,0,false);

dBase IV не поддерживает ftDateTime

3. и рекомендация MEMO FILE BLOCK SIZE 512


Наверх

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