Главная страница
    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.44 MB
Время: 0.045 c
4-1160667022
DmitryFox
2006-10-12 19:30
2007.02.25
Тень под формой


15-1170173370
_uw_
2007-01-30 19:09
2007.02.25
Хочется поругаться с кайфом


15-1170016567
i-am-vladko
2007-01-28 23:36
2007.02.25
Assembler


2-1170421186
Destroyer
2007-02-02 15:59
2007.02.25
Использование OnTerminate в TThread


15-1170269226
RedBanner
2007-01-31 21:47
2007.02.25
Скрытая работа программы





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский