Форум: "Основная";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
Вниз
ComboBox1.Items.Delete(??????); Найти похожие ветки
← →
просто Я © (2004-04-20 21:29) [0]Имеется ComboBox, туда в цикле добавляю записи
while not Table1.Eof do
begin
ComboBox1.Items.Add(DM.ADOTable1Name.AsString);
ADOTable1.Next;
end;
На выходе получается список, где много повторяющихся записей:
мыло
шило
мыло
мыло
шило
Ну очень бы хотелось, чтобы было просто
мыло
шило
Понимаю что в цикле нужно проверить список на наличие одинаковых записей, а реализовать не получается, даже мою реализацию привести стыдно!?
← →
просто Я © (2004-04-20 21:29) [0]Имеется ComboBox, туда в цикле добавляю записи
while not Table1.Eof do
begin
ComboBox1.Items.Add(DM.ADOTable1Name.AsString);
ADOTable1.Next;
end;
На выходе получается список, где много повторяющихся записей:
мыло
шило
мыло
мыло
шило
Ну очень бы хотелось, чтобы было просто
мыло
шило
Понимаю что в цикле нужно проверить список на наличие одинаковых записей, а реализовать не получается, даже мою реализацию привести стыдно!?
← →
Юрий Федоров © (2004-04-20 21:32) [1]if ComboBox1.Items.IndexOf(DM.ADOTable1Name.AsString) = -1 then
ComboBox1.Items.Add(DM.ADOTable1Name.AsString);
← →
Юрий Федоров © (2004-04-20 21:32) [1]if ComboBox1.Items.IndexOf(DM.ADOTable1Name.AsString) = -1 then
ComboBox1.Items.Add(DM.ADOTable1Name.AsString);
← →
просто Я © (2004-04-20 21:41) [2]Юрий Федоров © (20.04.04 21:32) [1]
IndexOf-?
← →
просто Я © (2004-04-20 21:41) [2]Юрий Федоров © (20.04.04 21:32) [1]
IndexOf-?
← →
Юрий Федоров © (2004-04-20 21:46) [3]Добавляем только если такой еще нет
← →
Юрий Федоров © (2004-04-20 21:46) [3]Добавляем только если такой еще нет
← →
просто Я © (2004-04-20 21:56) [4]Блин, ответ был так близко, а я в цикл полез.
Пасиба.
← →
просто Я © (2004-04-20 21:56) [4]Блин, ответ был так близко, а я в цикл полез.
Пасиба.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.037 c
