MasterSource - выдает ошибку

[nataly_ukr]

Связываю два dbf файла через Mastr Source Связать нужно по трем полям
В строке Form3.Table2.MasterFields:='ddok | ndok | kfio'; выдает ошибку "В таблице нет поля 'ddok | ndok | kfio' В литературе написан такой же синтаксис , а в жизни как надо делать? Пробовала соединить + , тoже выдает ошибку.


Form3.Table1.TableName:='kasot7.dbf ';
Form3.Table1.Active:=true;

Form3.Table2.TableName:='otcet7.dbf ';
Form3.Table2.Active:=true;
Form3.Table2.IndexName:='ind10.mdx' ;
Form3.Table2.MasterSource:=DataSour ce1;;
Form3.Table2.MasterFields:='ddok | ndok | kfio';

[Stilet]

наскока я помню нуна так :
Form3.Table2.MasterFields:='ddok;nd ok;kfio';

[nataly_ukr]

Для Stilet Пробовала с ';' выдает ошибку Fild index out of range Обратите внимание это DBF файл , а там соединение ключей идет через +

[Stilet]

Сообщение от nataly_ukr

Для Stilet Пробовала с ';' выдает ошибку Fild index out of range Обратите внимание это DBF файл , а там соединение ключей идет через +

Наташ, это если составной индекс в ФоксПро писать то да. А в делфе ты хелп почитай на MasterSource, там написано - разделитель Semicolons.
У тя с индексами проблема а не с подключением.

[mihali4]

Form3.Table2.IndexName:='ind10.mdx' ;

А что, для ДБФ индексы указываются именем файла?

[Andrei]

IMHO: Для соединения таблиц компонентами TTable через MasterSource по нескольким полям нужно чтобы подчиненная таблица имела составной индекс, в котором поля связи должны быть ведущими.

Однако, стандартные компоненты Delphi для работы с БД, по какой-то непонятной для меня причине, считают, что составные индексы могут иметь только файлы Paradox, а dbf таких индексов не имеют и потому с ними не работают

В качестве варианта могу предложить соединиться с подчиненной таблицей с помощью TQuery и организовать связь между таблицами через параметрический запрос. Правда, работать это будет медленнее.

[nataly_ukr]

С составными индексами я работаю в DBF без проблем , а здесь какой-то тупичек
Спасибо за советы Буду ждать еще сообщений

[mihali4]

Да никакого тупика нет, просто сначала ставим условия, а уж потом требуем выдать результат, т.е.:

Немного переделываем вот это:

Form3.Table2.Active:=true;
Form3.Table2.IndexName:='ind10.mdx';
Form3.Table2.MasterSource:=DataSource1;;
Form3.Table2.MasterFields:='ddok | ndok | kfio';

и получаем:

//ставим условия
Form3.Table2.IndexName:='ind10';
Form3.Table2.MasterSource:=DataSource1;
//чтобы не было ошибки "В таблице нет поля 'ddok | ndok | kfio', ставим 
//правильный разделитель - ";""
Form3.Table2.MasterFields:='ddok[COLOR="Red"];[/СOLOR]ndok;kfio';
//получаем результат
Form3.Table2.Active:=true;

Кстати, вариант Table2.Open несколько короче, вам не кажется?
А зачем вы везде употребляете Form3...?
У вас эта процедура находится в другом модуле, не в том, которому принадлежит форма Form3?
Если в том же, то ставить везде предваряющий параметр "Form3." абсолютно излишне...

[Andrei]

Сообщение от nataly_ukr

С составными индексами я работаю в DBF без проблем , а здесь какой-то тупичек
Спасибо за советы Буду ждать еще сообщений

Извините, вы не подскажете как создать составной индекс для DBF из Delphi?

Я небольшой специалист по этому вопросу и пользуюсь учебником В.В. Фараонов "Программирование баз данных в Delphi 7".
Там в главе "Составные индексы" написано буквально следующее:

... Для создания составного индекса в серверных таблицах и таблицах типа Paradox с помощью программы SQLExplorer используется SQL-запрос типа

CREATE INDEX IndexName ON TableName(Field1, Field2, ...)

В широко распространенных таблицах типа dBASE нельзя создать составной инденкс и, следовательно, реализовать быстрый поиск при участии нескольких полей. В базирующихся на них средствах разработки (dBASE III+,dBASE IV, FoxPro, Clipper) для этих целей обычно используют индекс, построенный по индексному выражению, с приведением нужных полей к строковому типу. Например:

STR(FINCODE,5)+LEFT(FINTYPE,1)+DTOS (FINDATE)

Это индексное выражение формирует строку из 5 символов преобразования целого значения поля FINCODE, первого символа значения строкового поля FINTYPE и преобразованного к строке значения даты из поля FINDATE.

Увы! Delphi не имеет средств поиска по индексным выражениям. Таким образом, использование таблиц dBASE в приложениях Delphi менее удобно, чем таблиц Paradox...

[Stilet]

Совершенно верно, поэтому для работы с составными индексами луче подойдет не BDE а ADO+провайдер FoxPro.