Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.04.18;
Скачать: [xml.tar.bz2];

Вниз

Поиск в ComboBox   Найти похожие ветки 

 
som   (2004-03-31 11:58) [0]

Имеется ComboBox с большим кол-вом элементов. Как осуществить по нему поиск?


 
sir John   (2004-03-31 12:01) [1]

могу предложить очень простой алгоритм поиска. Создаем StringList в него загружаем все элементы бокса и ищем нужный.


 
Smithson ©   (2004-03-31 12:10) [2]

ComboBox1.Items.IndexOF - не?


 
хамло )   (2004-03-31 12:13) [3]

поиск строки с полным совпадением

i:=ComboBox1.Items.IndexOf(SearchingString);

частичное совпадение

function FindTextInComboBox(SearhingString: string): integer;
var i: integer
begin
  for i:=0 to ComboBox1.Items.Count-1 do
    if Pos(ComboBox1.Items[i], SearchingString)>0 then
    begin
      Result:=i;
      Break;
    end;
end;

не бейте ногами за такое решение ))


 
esVer ©   (2004-03-31 12:21) [4]

Велосипед изобретаем?

F1 на CB_FINDSTRING

ind := SendMessage(MyCombobox.Handle, CB_FINDSTRING, - 1, Integer(PChar("MyString")));

и далее по необходимости...



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

Форум: "Основная";
Текущий архив: 2004.04.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.035 c
1-1080742977
ПрогерШ
2004-03-31 18:22
2004.04.18
символ при вводе пароля


1-1080805977
alex123
2004-04-01 11:52
2004.04.18
Поменять порядок вкладок в PageControl


14-1079973539
Обитатель
2004-03-22 19:38
2004.04.18
Про тех кто отвечает...


1-1080563401
Анна
2004-03-29 16:30
2004.04.18
Цветные строки в TMemo


1-1080889492
still_swamp
2004-04-02 11:04
2004.04.18
D8 и ADO





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский