Проблема с базой...
Ted © (2004-08-12 19:10:00)
Необходимо сделать в базе данных переход к нужной записи с
помощью cbcombobox...
Делаю так...
procedure tform1.refCB1();
begin
CB1_predpr.Clear;
CB_vid.Clear;
CB_ist.Clear;
CB_adr.Clear;
Table1.First;
while not Table1.EOF do
begin
CB1_predpr.Items.Add(Table1.FieldByName('Name').AsString);
CB_vid.Items.Add(Table1.FieldByName('Dela').AsString);
CB_ist.Items.Add(Table1.FieldByName('Istok').AsString);
CB_adr.Items.Add(Table1.FieldByName('Street').AsString);
Table1.Next;
end;
Table1.First;
end;
При этом естественно есть куча одинаковых записей... как
сделать так чтобы они были уникальными?
Алхимик (2004-08-12 21:18:00) [1]
SQL и TQuery спасёт отца русской демократии.
select Distinct <имя поля> from <имя
таблицы>
Наверх 
ЧАТ |
Орешник |
|
