Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.08;
Скачать: CL | DM;

Вниз

При переходе с Paradox таблица на DBF таблицу программа ругается   Найти похожие ветки 

 
Мефодий   (2002-06-13 20:58) [0]

В программе есть TTable, который использую для промежуточных файлов типа DBF(нужно для создания специальных индексов) или Paradox (без индексов дает возможность нормального скроллинга в DBGrid EhLib). Cоздав DBF таблицу:
with DM.Table1 do
begin
Close;
TableType := ttDBase;
TableName := "A1";
with FieldDefs do
begin
Clear;
Add("Field1",ftInteger, 0,False);
Add("Field2",ftDate, 0,False);
...
end;
with IndexDefs do
begin
Clear;
Add("Date","Dtos(Field2)",[ixExpression]);
end;
CreateTable;
Open;
IndexName := "Date";

с индексом (под названием "Date") заканчиваю с ней работу командами

Table1.Close;
Table1.DeleteTable;

В другом месте программы создаю уже Paradox таблицу:

with DM.Table1 do
begin
Close;
TableType := ttParadox;
TableName := "A2";
with FieldDefs do
begin
Clear;
Add("Field1",ftString, 10,False);
Add("Field2",ftInteger, 0,False);
...
end;
IndexDefs.Clear;
CreateTable;
Open;

Проблема в том, что в строке Open возникает ошибка:
Index "Date" not found.
О каком индексе идет речь ? Ведь я закрыл файл и уничтожил его. А перед CreateTable почистил индекы (IndexDefs.Clear).
Что только не пробовал, ничего не помогает.
Может кто встречался с подобной проблемой ?
Спасибо.


 
vads   (2002-06-14 13:50) [1]

Все правильно, индекса уже нет ни в "природе" ни в IndexDefs,
а IndexName у тебя все равно равен "Date", вот он его и пытается найти, те IndexName := ""


 
Мефодий   (2002-06-14 17:07) [2]

Спасибо. Сработало.



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

Текущий архив: 2002.07.08;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
1-23581
Quad
2002-06-17 20:05
2002.07.08
Замучался я с QReport ом... ПОМОГИТЕ!!!


14-23735
Revo
2002-06-03 16:23
2002.07.08
После Delphi решил помучить C++ Builder


14-23739
Erlan
2002-06-06 08:46
2002.07.08
Траблы в сети


14-23777
Bor
2002-06-08 13:38
2002.07.08
ПОМОГИТЕ!!!!!!


8-23687
Лёша
2002-02-22 17:02
2002.07.08
Цифровой фильтр.