Скачать: CL | DM;

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;

---

← →
KADAN ©   (2004-07-08 14:15) [6]

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

---

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

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.024 c