Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Pages приведи пример Query, Pages приведи пример Query,пожалуйста 
:(
    Опции темы
Dusimov
  Дата 25.10.2002, 18:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 24.10.2002

Репутация: нет
Всего: нет



Pages приведи пример Query
PM MAIL   Вверх
Vit
Дата 25.10.2002, 23:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207



SQL
SELECT * From biolife


Только какое это имеет отношение к Дельфи?


--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
Medved
Дата 26.10.2002, 00:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 7209
Регистрация: 15.9.2002
Где: Kazakhstan, Astan a

Репутация: 14
Всего: 154



Хорошо, вот пример:
У нас имеются две таблицы:
1) первая главная - Отделы (otdels)
в ней два поля:
----------------------------------
ID_Ot |       Name_Otdel             |            
----------------------------------
   1    |       Медицинский          |
   2    |       Технический           |
----------------------------------

2) Вторая таблица Cотрудников (sotrud)
в ней три поля
------------------------------------------------------------------------
ID_S  |       FIO_Sotrud              | Link_Otdel ( Поле связи с отделами) |          
------------------------------------------------------------------------
   1    |       Иванов И.И.            |        1                                           |
   2    |       Петров П.П.            |        2                                           |
   3    |       Сидоров С.С.          |        2                                           |
------------------------------------------------------------------------
Из вышеприведенного видим, что Иванов относиться к медецинскомцу отделу,
а Петров и Сидоров к Техническому.

Теперь, в обработчике события OnDataChange компонента TDataSource, который подвязан к Query (Query1), который возвращает нам наименования всех отделов, мы должны прописать следующий код, для того чтобы второй Query (Query2) возращал нам тоько тех сотрудников, которые при надлежат  к тому отделу, который является текущим.

Код

begin
 Query2.Close;
 Query2.SQL.Clear;
 Query2.SQL.Add('Select * From Sotrud');
 Query2.SQL.Add('Where Link_Otdel = '+Query1.FieldByName('ID_S').AsString);
 Query2.SQL.Add('Order By Fio_Sotrud');
 Query2.Open;
end;


Вот и все, код конечно можно еще довоьно сильно упростить и сократить, заменяя не весь запрос, а только строчку с "Where". НО это уже другая история.


--------------------
http://extreme.sport-express.ru/
...и неважно сколько падал, важно сколько ты вставал...
PM MAIL WWW ICQ Skype GTalk   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.3036 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.