powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Listbox
8 сообщений из 8, страница 1 из 1
Listbox
    #32170809
mesmer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ребята помогите. срочно! Пропадаю!
На форме лежит listbox(список препаратов), как можно сделать что бы при нажатии на один из препаратов(при нажатии на строку) происходило действие(хотябы в label писалась инфо).
Помогите кто сможет, или хотябы пример напишите.
Лучше скиньте на bas@reghos.nsc.ru
<>
...
Рейтинг: 0 / 0
Listbox
    #32170819
Papka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ne ponjatno chto znachit pri nazhatii na stroku. V principe mozhno ispolzovat sobitije OnChange. Tam vse i propishi.
...
Рейтинг: 0 / 0
Listbox
    #32170847
Voha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Гореть можно всегда но доку читать тоже надо всегда.
Код: plaintext
1.
2.
3.
4.
procedure TForm1.ListBox1Click(Sender: TObject);
begin
Label1.Caption:=ListBox1.Items.Strings[ListBox1.ItemIndex]
end;
...
Рейтинг: 0 / 0
Listbox
    #32171159
mesmer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
При использовании OnChange - событие же будет сработано при нажатии на "весь" Listbox, а надо при нажатии на определенный препарат!
...
Рейтинг: 0 / 0
Listbox
    #32171183
Фотография tygra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Хе-хе
Дык вот ты в OnChange и проверяй - какой препарат выбрали. И если тот, то делай чего надо.
...
Рейтинг: 0 / 0
Listbox
    #32171376
Voha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Чёто мне ккажется нет в Листе OnChange,
в дереве есть да а там нет, во всяком случае у меня (даже в хелп заглянул)
...
Рейтинг: 0 / 0
Listbox
    #32171441
Berg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вариант

if (ListBox1.Items.Strings[ListBox1.ItemIndex] = 'определенный препарат')
Label1.Caption := 'неопределенный препарат';

нормально работает.
...
Рейтинг: 0 / 0
Listbox
    #32172521
Papka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Voha

Tochno. Net. Stranno. Celoje sobitije sperli. Nichego bez prismotra ostavit nelzja. :)
Nu togda mozhno obrabotat OnClick().
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Listbox
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]