Форум: "Начинающим";
Текущий архив: 2007.02.25;
Скачать: [xml.tar.bz2];
Вниз
Повтор значений - ошибка Найти похожие ветки
← →
SveTT © (2007-02-03 15:14) [0]Здравствуйте!
Подскажите пожалуйста, почему имеет место ошибка - при выборе мышкой (или курсором вверх, вниз) из списка значений, выбранное значение дублируется. При вводе символа значений с клавиатуры такого не происходит! Ошибка не кретична, но хотелось бы разобраться.procedure TTRF_TOVARHISTORY.ComboBox1Change(Sender: TObject);
begin
DMFrm.HistoryQuery.Close;
DMFrm.HistoryQuery.SQL.Clear;
DMFrm.HistoryQuery.SQL.Add("SELECT DISTINCT KOD, FULLname FROM "TOVAR.DB" ");
DMFrm.HistoryQuery.SQL.Add("WHERE KOD LIKE """+ComboBox1.Text+"%""");
DMFrm.HistoryQuery.Open;
DMFrm.HistoryQuery.First;
While not DMFrm.HistoryQuery.Eof do begin
ComboBox1.Items.Add(DMFrm.HistoryQuery.FieldByName("KOD").AsString);
DMFrm.HistoryQuery.Next;
end;
Info.Caption := " "+DmFrm.HistoryQuery.FieldByName("Fullname").AsString+"";
end;
← →
Johnmen © (2007-02-03 19:05) [1]
> Подскажите пожалуйста, почему имеет место ошибка - при выборе
> мышкой (или курсором вверх, вниз) из списка значений, выбранное
> значение дублируется.
Вот и ответ:> ...
> ComboBox1.Items.Add(DMFrm.HistoryQuery.FieldByName("KOD").AsString);
> ...
← →
Desdechado © (2007-02-03 19:30) [2]т.е. в обработчике "изменение состояние комбо" стоит вставка в этот самый комбо
← →
SveTT © (2007-02-04 08:49) [3]Спасибо Вам!
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.02.25;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.048 c
