Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Заполнение DBCombobox/ DBListBox [D7]

Denis_Ac © (2004-10-22 08:07:00)
Как сделать, чтобы из таблицы справочника:
--------------------------|
название группы| факультет|
--------------------------|
Combobox заполнить названием факультетов, а ListBox названием групп выбранного факультета.
ЗЫ Непонятен именно процесс заполнение (Пытался зделать, а работать не хочет :(((( )

Submarine (2004-10-22 10:17:00) [1]
Забываю кидать обьяснение:
Сначала я кидаю вид корреспонденции в Items, а в обьект закидываю его код, а потом просто при выборе вида корреспонденции
открываю запрос типа select * From table where id=:dd,
где dd=(Tidd(ComboBox1.Items.Objects[irec]).Iobject);
и спокойно заполняй себе, что хочешь....

Submarine (2004-10-22 10:07:00) [2]
Реализация этой задачи простая, она проще реализуются через обычный Combobox и Listbox:
Зы

type
TIDD = class
Iobject: integer;
end;
// Заполняем сомбобокс по выбору вида корреспонденции
fmdtmdl.help1.Close;
fmdtmdl.help1.SQL.Clear;
fmdtmdl.help1.sql.Add('Select *');
fmdtmdl.help1.sql.Add('From CATALOGCONTENT');
fmdtmdl.help1.sql.Add('where catalogid=203');
irec:=0;
with fmDTMDL.help1 do
begin
open;
while not EOF do
begin
Combobox1.items.add(FieldByName('name').AsString);
idd:=tidd.create;
idd.Iobject := FieldByName('CONTENTID').value;
ComboBox1.Items.Objects[IRec] := idd;
irec:=irec+1;
next;
end;
end;
А в Listbox также заполняем, используя
входной параметр (Tidd(ComboBox1.Items.Objects[irec]).Iobject);

Denis_Ac (2004-10-22 08:24:00) [3]
Это я чисто условно написал.(факультет и названиями факультетов,одно и тоже)
Sorry - "зделать"=сделать. Как их заполнить.

ЮЮ (2004-10-22 08:14:00) [4]
>Пытался зделать, а работать не хочет

И где эта попытка? Теперь всем нам пытаться?
Неверное или неполное условие: В справочнике у тебя "факультет", а Combobox хочешь заполнить "названиями факультетов"

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »