моно

а как Вы связываете????

ну и в чем проблема???

есть 2 пути

1. в лоб ручками писать
2. приняться за программирование хитрого объекта


чего нравится???

ну давай, попробуем
тока, предупрежу
дело муторное и по-началу непонятное
(и спорное- сейчас будет шквал комментов)
все будем делать руками и за всем следить головой
будем пробовать???

пока будем по-простому
я так понимаю если релейшины- курсорадаптер нам пока не нужен

если с объектом, то
придется пересмотреть стратегию

начнем создавать объект, который будет умный
и сам будет себе подготавливать источники и сам их будет поднимать

создавай хитрый объект на основе кустома
называй к примеру oCascad

ему проперти
cAlias
cAliasCascad
cRelation

в ините oCascad
принцип таков - поднять таблицы и поставить связь

принцип понятен??

объект вызывается из формы
(предварительно, конечно форме делается такое свойство oCascadObjects)
SET CLASSLIB TO libr ADDITIVE
this.oCascadObjects = create("oCascad","c:\table1.dbf","c\table2.dbf","tt=1")
if vartype(this.oCascadObjects)#"O"
= messagebox("Ошибка загрузки данных!")
retu .f.
endif

т.е. мы создали универсальный объет
и будем его поднимать во всех формах на взлете


продолжать дальше будем???

во, молодца

как быстро можно испугать человека

да, ....

guest 002 , а что испугало??
работа с классами???

да жалко

есть желающие еще??

авторМолодец, я долго ржал. :-))))
немного не вник, над чем?
интересно, однако
а ече я крестиком могу и на машинке ...

авторЧто делает try ... endtry?
перекрывает обработчик ошибок (позволяет не пользоваться он еррор, см.хелп)
не дает коду вывалиться
и видим загрузились таблицы или нет


Идея такая
написать универсальный объект-форму
с объектами-гридами и каскадным объектом-источником данных
для настольных таблиц

писать будем???

у лисы все это уже есть
все это можно сделать проще в контейнере БД,
но когда появляются навороты тогда и появляются у лисы проблемы

так Окей
давайте определимся с задачей
задача такая
написать класс-форму
с двумя связанными гридами и набором кнопочек
добавить удалить
(писать пока будем без апдейтов и курсорадаптеров)
(все это будет аналог лисьей формы с ДЕ, но только наш и умнее)


у формы будет каскад-объект, который будет сам подниматься
и вязать данные и знать что где и как удалить

давайте определимся
вначале с данными
предлагаю структуру такую
(я прикладываю архив - создавайте у себя каталог
и подправьте файлики training.lnk config.trn
там есть 2 таблицы main и каскад)
постановка и структура БД удовлетворяет???


писать будем по-шагам, чтобы стало понятно
для чего это все и как будет жить
и как нужно делать

вообще это нужно кому-то??
окей???

Так начинаем плясать от печки
сразу, оговорюсь писать будем пока формы
без передачи параметров на взлете (т.к. никто пока ничего не поймет
и не разберется, поэтому пока по-простому)

создаем библиотеку
делаем это так

создаем проект Library
и в нем создаем одноименную библиотеку
(это будет наша основная библиотека, которой будем пользоваться
и в которой будут жить все наши классы-объекты)
хорошо.
в этой библиотеке мы определяемся, что у нас будет
а будет у нас там форма, грид и объект-каскад

1. так опять-же
вначале беремся за объект-каскад
создаем его на основе кастома как писалось выше
даем ему различные свойства и описываем ему пока инит, ок

2. создаем класс-грид

3. так, дальше думаем
он у нас будет жить в форме
ок, создаем объект-форму на основе базового класса формы
и описываем ей в ините подъем каскад-объекта
соответственно придумываем, что у формы-заготовки будет
ряд свойств настраиваемых, в соответствии с которыми затем будет подниматься этот каскад-объект

все создание библиотеки на отом приостанавливаем




Дальше беремся за наше основное приложение
создаем проект MyApp
на основе библиотечной класс-формы
создаем форму которая будет у нас работать в приложении
называем ее MyForm
и жить она у нас будет в библиотеке проекта MyApp AppLibrary

устанавливаем ей размеры, двигаем объекты
и прописываем ей свойства (Таблица основная, Таблица каскадная, и Выражение связи)

ок

пишем запускающий файл start.prg

все, пробуем играться
(кнопочки добавить - удалить - это следующий этап)

продолжать будем??

вот это что я сляпал

это с точки зоения ....

но это для того чтобы Вы поняли сам принцип
как должно быть (архитектуру)

см. инит каскад-объекта в библиотеке

в ините формы-шаблона в библиотеке library

this.oGrid_Main.RecordSource = This.oCascadObjects.cAlias
this.oGrid_Cascad.RecordSource = This.oCascadObjects.cAliasCascad