Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 29.04.2009, 12:18   #11
Andrei
Форумчанин
 
Регистрация: 20.06.2007
Сообщений: 270
По умолчанию

Цитата:
Сообщение от antoni Посмотреть сообщение
В ADOQuery нету свойства MasterSource оно есть только в AdoTable
Зато у него есть свойство DataSource, что практически то же самое.

В ADOQuery.SQL дочерней таблицы пишем запрос типа:

Код:
SELECT * FROM rashod WHERE rashod.pokup = :pokup
,где имя параметра pokup полностью совпадает с именем поля в родительской таблице.

Всё. Связь установлена.

PS: Таким образом можно связать таблицы, находящиеся даже под управлением различных СУБД. Например, я с помощью подобного запроса перегонял данные из DBF в Interbase.
-Кукушка, кукушка! Накукуй мне сто лет!
-А накукуй тебе столько?

(с) Библия. Вольный перевод с древнееврейского.
Andrei вне форума Ответить с цитированием
Старый 29.04.2009, 12:18   #12
S@fer
Форумчанин
 
Аватар для S@fer
 
Регистрация: 29.01.2009
Сообщений: 411
По умолчанию

По событию OnCellClick в первой таблице делаешь запрос для второй.
Код:
ADOQuery2.Active:=False;
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('SELECT * FROM [Tablica2] WHERE Pole = "'+ADOQuery1.Fields[0].AsString+'"');
ADOQuery2.Active:=True;
, где ADOQuery1.Fields[0].AsString - поле по оторому производится поиск
S@fer вне форума Ответить с цитированием
Старый 29.04.2009, 12:40   #13
antoni
Пользователь
 
Регистрация: 01.08.2008
Сообщений: 32
По умолчанию

Давай я тебе исходники вышлю!!! покажи пожалуйста на моем примере, куда высылать ???
antoni вне форума Ответить с цитированием
Старый 29.04.2009, 12:40   #14
antoni
Пользователь
 
Регистрация: 01.08.2008
Сообщений: 32
Печаль

Цитата:
Сообщение от S@fer Посмотреть сообщение
По событию OnCellClick в первой таблице делаешь запрос для второй.
Код:
ADOQuery2.Active:=False;
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('SELECT * FROM [Tablica2] WHERE Pole = "'+ADOQuery1.Fields[0].AsString+'"');
ADOQuery2.Active:=True;
, где ADOQuery1.Fields[0].AsString - поле по оторому производится поиск
Давай я тебе исходники вышлю!!! покажи пожалуйста на моем примере, куда высылать ???
antoni вне форума Ответить с цитированием
Старый 29.04.2009, 12:46   #15
antoni
Пользователь
 
Регистрация: 01.08.2008
Сообщений: 32
По умолчанию

Давай я тебе исходники вышлю!!! покажи пожалуйста на моем примере, куда высылать ???
antoni вне форума Ответить с цитированием
Старый 29.04.2009, 12:53   #16
S@fer
Форумчанин
 
Аватар для S@fer
 
Регистрация: 29.01.2009
Сообщений: 411
По умолчанию

Выкладывай на форум.
Майл в личке написал
S@fer вне форума Ответить с цитированием
Старый 29.04.2009, 12:54   #17
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
antoni
Сюда прикрепи архив проекта.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 29.04.2009, 13:28   #18
antoni
Пользователь
 
Регистрация: 01.08.2008
Сообщений: 32
По умолчанию

что то не загружает блин, может по асе или email ???
antoni вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
из Grid в Edit stp56 Общие вопросы Delphi 8 18.04.2009 01:53
String Grid в VC++ Аlex Общие вопросы C/C++ 1 30.01.2009 22:48
манипулирование grid-ом Andriyko Компоненты Delphi 2 04.10.2008 17:08
Grid nimf Общие вопросы Delphi 2 22.04.2008 13:16
два TMediaPlayer и два AVI-файла zeleniy Компоненты Delphi 0 01.06.2007 14:14