Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Delhpi: связанные таблицы, в Combobox из поля Table 
:(
    Опции темы
И Л И
Дата 13.10.2004, 11:32 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Есть 2 таблицы: первая содержит фио, код должности. Вторая код должности, должность. Таблицы связаны по полям код должности (Table2.MasterSource:=DataSource1 и указан MasterFields). Combobox должен содержать все должности второй таблицы. Я делаю так:
Код
procedure TForm2.FormCreate(Sender: TObject);
begin
with Table2 do
begin
  First;
  while not Eof do
     begin
        Combobox1.Items.Add(FieldbyName ('Dolzhnost').Asstring);
        next;
     end;
end;
end;


Выдает только первую должность. Что не так?
  Вверх
Pakshin A. S.
Дата 13.10.2004, 19:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


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

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



Сделай DBGrid, подключи его к Table и запусти его. Вся ли таблица вывелась?
PM   Вверх
И Л И
Дата 14.10.2004, 05:02 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Помимо имеющихся полей Table1 создал новое поле, указал имена связующих полей(код должности), результирующее поле (должность). В DBGrid вывелось все, как надо...
  Вверх
innok
Дата 14.10.2004, 07:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

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



Цитата

with Table2 do
begin
First;

а если вынести First до with table2 wink.gif
PM MAIL   Вверх
И Л И
Дата 14.10.2004, 09:14 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Цитата(innok @ 14.10.2004, 07:11)
а если вынести First до with table2

А смысл?
  Вверх
x77
Дата 14.10.2004, 12:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


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

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



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


--------------------
Я никогда не сопротивлялся искушению, поскольку узнал: что мне
не нравится, то меня не искушает.
© Джордж Бернард Шоу (Ирландия)
PM MAIL ICQ   Вверх
И Л И
Дата 14.10.2004, 13:24 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











x77
Спасибо, работает. biggrin.gif
  Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

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

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


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


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

FAQ раздела лежит здесь!


Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.

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


 




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


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

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