Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ListBox ? [D7, NT4, WinXP]


TriX ©   (2004-09-12 19:05:00) 

мне нужно сделать так
чтоб при выделении строки в ListBox с текстом qwerty программа закрывалась.
и как узнать сколько всего строк в ListBox..


TriX   (2004-09-12 20:09:00) [1]

отмена допер

procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.text:=inttostr(listbox1.count);
end;

procedure TForm1.click(Sender: TObject);
begin
if listbox1.items[listbox1.itemindex]='qwerty' then close
end;

end.


Alx2   (2004-09-12 19:14:00) [2]

ListBox.Count - количество
With ListBox do Items[ItemIndex] - текущая строчка


Семен Сорокин   (2004-09-12 19:12:00) [3]

1. ListBox.OnClick
2. ListBox.Items.Count


Наверх

Титульная страница Поиск, карта сайта Написать письмо