Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.02.25;
Скачать: CL | DM;

Вниз

Повтор значений - ошибка   Найти похожие ветки 

 
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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.034 c
15-1170251680
Ученик чародея
2007-01-31 16:54
2007.02.25
PHP vs Delphi.


2-1170688298
daser
2007-02-05 18:11
2007.02.25
Как отловить движение курсора по записям в гриде?


15-1168949697
Vlad Oshin
2007-01-16 15:14
2007.02.25
Рационализаторская идея про стир.машины


15-1170389654
Mozart
2007-02-02 07:14
2007.02.25
*.pdf


4-1160667022
DmitryFox
2006-10-12 19:30
2007.02.25
Тень под формой