ComboBox

← →
Дмитрий2004 (2004-07-08 10:54) [0]

У меня есть ComboBox в который из столбца таблицы по циклу заполняются значения , но значения в столбце совпадают и он заносит в ComboBox повторяющиеся значения , подскажите как это можно исключить.

← →
Семен Сорокин © (2004-07-08 10:56) [1]

1. Отсортировать таблицу по значениям, не заносить повторяющиеся.
2. Проверять если ComboBox.Items.IndexOf(значение) вернул -1, то заносить.

← →
1008 © (2004-07-08 11:02) [2]

Каждое новое сравнивать с имеющимися в комбобоксе и если такое уже есть, то не добавлять его.

if newString<>Combobox.Items[i] then Combobox.Items.Add(newString);

← →
Дмитрий 2004 (2004-07-08 13:23) [3]

Пробовал не получается
я писал так
with Form8.ADOTable4 do
begin
First;
ComboBox9.Clear;
i:=0;
brigada:=Form8.ADOTable4.FieldByName("???????").Value;
ComboBox9.Items.Add(Form8.ADOTable4.FieldByName("???????").Value);
while not eof do
begin
ComboBox9.Refresh;
if brigada=Form8.ComboBox9.Items[i] then
begin
next;
end
else
begin
Form8.ComboBox9.Items.Add(Form8.ADOTable4.FieldByName("???????").Value);
next;
brigada:=Form8.ADOTable4.FieldByName("???????").Value;
Form8.ComboBox9.ItemIndex:=Form8.ComboBox9.ItemIndex+1;
end;

end;
end;

← →
Ozone © (2004-07-08 13:40) [4]

ADOQuery + DISTINCT

← →
KADAN © (2004-07-08 13:49) [5]

First;
ComboBox9.clear;
for i:=0 to recordcount do begin
brigada:=Form8.ADOTable4.FieldByName("???????").Value;
if ComboBox9.Items.IndexOf(brigada)=-1 then
ComboBox9.Items.add(brigada);
next;
end;

сорри, recordcount-1 конечно же

← →
Дмитрий 2004 (2004-07-08 16:36) [7]

Kadan спасибо все работает

ComboBox Найти похожие ветки