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

Вниз

Помогите написать программу на Delphi   Найти похожие ветки 

 
Abdul   (2011-10-26 19:31) [0]

Доброго времени суток
Мне нужно написать программу на Delphi,которая
будет действовать так:
В списке ListBox много фамилий.
Пользователь в поле Edit введён искомую фамилию.
А при нажатии кнопки,программа проверит если в списке эта фамилия,и если есть то укажет на неё.

Вот как то так  

ПОМОГИТЕ ПОЖАЛУЙСТА
Спасибо за внимание


 
MBo ©   (2011-10-26 19:45) [1]

у ListBox.Items есть метод для поиска строки


 
Faceless ©   (2011-10-26 19:49) [2]

procedure TForm1.Button1Click(Sender: TObject);
var
 N: Integer;
begin
 N := ListBox1.Items.IndexOf(Edit1.Text);
 if N <> -1 then
   ListBox1.ItemIndex := N;
end;


 
KilkennyCat ©   (2011-10-26 21:14) [3]


> Faceless ©   (26.10.11 19:49) [2]

можно сократить, если допустимо присваивание -1 (непомню про делфи)
procedure TForm1.Button1Click(Sender: TObject);
begin
 ListBox1.ItemIndex := ListBox1.Items.IndexOf(Edit1.Text);
end;



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

Текущий архив: 2012.02.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.007 c
2-1319364878
stas
2011-10-23 14:14
2012.02.05
DBGrid колонки справа налево


2-1319921661
samsung
2011-10-30 00:54
2012.02.05
Поиск в Memo


3-1271399949
Виктор
2010-04-16 10:39
2012.02.05
вывод содержимого формы на печать


2-1319835964
Alek
2011-10-29 01:06
2012.02.05
Передача метода класса по ссылке


2-1319627705
dev888
2011-10-26 15:15
2012.02.05
помогите определиться с форматом функции