Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.03.2009, 20:36   #1
CraZZy RabbIt
Форумчанин
 
Регистрация: 16.02.2009
Сообщений: 172
Вопрос поочередный клик на все items в listbox

есть форма,на ней листбокс и мемо...при нажатии на элемент листбокса в мемо появляется текст...как сделать чтоб не пользователь кликал по листбоксу а клики выполнялись программно...есть идея реализовать это в цикле с помошью perform...только вот не могу разобратся до конца...

Последний раз редактировалось CraZZy RabbIt; 10.03.2009 в 20:46.
CraZZy RabbIt вне форума Ответить с цитированием
Старый 10.03.2009, 20:44   #2
Манжосов Денис :)
Участник клуба
 
Регистрация: 29.01.2008
Сообщений: 1,039
По умолчанию

Код:
for i:=1 to ListBox.Items.Count do
 Memo1.Lines.Add(ListBox.Items.Strings[i]);
Сам не пробовал, но должно работать
Манжосов Денис :) вне форума Ответить с цитированием
Старый 10.03.2009, 21:04   #3
CraZZy RabbIt
Форумчанин
 
Регистрация: 16.02.2009
Сообщений: 172
По умолчанию

Цитата:
Сообщение от Манжосов Денис :) Посмотреть сообщение
Код:
for i:=1 to ListBox.Items.Count do
 Memo1.Lines.Add(ListBox.Items.Strings[i]);
Сам не пробовал, но должно работать

наверно либо я неправильно сформулировал вопрос,либо вы неправильно поняли...этот код выводит сами итемы в мемо..а мне нужно чтоб именно клики осушествялись...
пробовал так -

SendMessage(ListBox1.Handle, LB_SETCURSEL, 0{номер нужной строки}, 1);
ListBox1.Perform(WM_LBUTTONDOWN, 0, 0);
ListBox1.Perform(WM_LBUTTONUP, 0, 0);

но клик только по первому элементу...скажите где ошибка!
CraZZy RabbIt вне форума Ответить с цитированием
Старый 11.03.2009, 14:03   #4
Jeni
Форумчанин
 
Регистрация: 31.05.2007
Сообщений: 486
По умолчанию

Цитата:
Сообщение от CraZZy RabbIt Посмотреть сообщение
скажите где ошибка!
Ошибка в самой постановке вопроса.

Цитата:
Сообщение от CraZZy RabbIt Посмотреть сообщение
чтоб не пользователь кликал по листбоксу а клики выполнялись программно... есть идея реализовать это в цикле...
Если клики выполняются программно, то зачем вообще "кликать"? Проще сразу писать в Мемо нужную информацию, хоть в цикле, хоть без цикла.
Jeni вне форума Ответить с цитированием
Старый 11.03.2009, 14:20   #5
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Изучайте свойства, методы и события компонентов.
Выбранный итемс в листбоксе:
ListBox1.ItemIndex:=...
Вот и переберите их в цикле.

Последний раз редактировалось mihali4; 11.03.2009 в 15:09.
mihali4 вне форума Ответить с цитированием
Старый 11.03.2009, 15:03   #6
CraZZy RabbIt
Форумчанин
 
Регистрация: 16.02.2009
Сообщений: 172
По умолчанию

Цитата:
Сообщение от Jeni Посмотреть сообщение
Если клики выполняются программно, то зачем вообще "кликать"? Проще сразу писать в Мемо нужную информацию, хоть в цикле, хоть без цикла.
постановка задачи не в выводе в мемо по клику ,а именно по программному нажатию клавиш в листбоксе!
зы.
да,маленько неправильно я вопрос задал..
CraZZy RabbIt вне форума Ответить с цитированием
Старый 11.03.2009, 15:13   #7
Jeni
Форумчанин
 
Регистрация: 31.05.2007
Сообщений: 486
По умолчанию

В таком случае создать обработчик для ListBox (на этапе разработки), а потом вызывать эту процедуру. Если нужно - в цикле, только не забывать перед вызовом устанавливать свойство ItemIndex, чтобы знать какой элемент обрабатывать в обработчике.
Jeni вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как добавить в listbox файлы(пишу с помощью bassplayer)(Listbox+opendialog=play) blackstersl Общие вопросы Delphi 11 09.06.2010 13:23
Двойной клик Алежа Общие вопросы .NET 3 16.11.2008 23:20
Клик мыши stayer Общие вопросы Delphi 1 30.10.2008 19:53
Items of ComboBox Технолог Компоненты Delphi 2 20.04.2008 14:04