[nav]

пишу первую программу по БД. Связал три таблицы customer,items,orders тдея такая: тыкаешь мышкой на строку в первой таблице, прога выдает количество CustNo во второй и колическво OrderNo для 3-й

Код:

1 2 3 4 5 6 7 8 9 10 11

procedure tform1.FormCreate(sender:tobject); var help1,help2,count1,count2:integer; begin help1:=Table1.FieldValues['CustNo'];  help2:=Table2.Fieldvalues['OrderNo'];  count1:=0; count2:=0;  if Table2.FieldValues['CustNo']=help1  then count1:=count1+1;  if Table3.FieldValues['OrderNo']=help2  then count2:=count2+1;  CustNo0.Text:=inttostr(count1); OrderNo0.Text:=inttostr(count2); end;

custNo0,orderNo0:tEdit

[nav]

Я что бред написал?

[alexfin]

Не совсем понятно что именно ты хочешь добиться

[nav]

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

Не совсем понятно что именно ты хочешь добиться

дано три таблицы customer,items,orders . В первой таблице есть поле CustNo Во второй есть несколько полей CUSTno с такими же значениями. Хочу посчитать их количество.
Во второй таблице есть поле OrderNo, которому соответствует несколько значений в 3-й таблице. Тоже необходимо их количество

[Appolon]

смотри вложенный файл. Тебе в таком роде надо??

[belik69]

Смотрел ваш исходник, класс.
Скажите, как вы подключаете таблицы не подключая BDE?
Как подключить прямой строкой я знаю, у вас как то по другому.

[Yurk@]

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

Скажите, как вы подключаете таблицы не подключая BDE?
Как подключить прямой строкой я знаю, у вас как то по другому

Да ниче оссобенного там нет!
Просто.... если имя БД не указано - будет произведен поиск по родительской папке (в которой эти базы и находятся)