Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Компоненты и классы
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 17.11.2007, 18:45
Димарий Димарий вне форума
Прохожий
 
Регистрация: 17.11.2007
Сообщения: 4
Репутация: 10
По умолчанию TListBox по координатам выделить.

Привет народ!
Есть загвоздка.
Имеем listBox там разные строчки.
Надо зная координаты строки в ListBox выделить ее. Или фокус на нее поставить.
Ответить с цитированием
  #2  
Старый 17.11.2007, 19:03
Аватар для Winny
Winny Winny вне форума
Продвинутый
 
Регистрация: 26.05.2007
Адрес: Планета земля, Россия, Москва
Сообщения: 620
Репутация: 30
По умолчанию

Код:
ListBox1.ItemIndex:=Номер нужной строки
__________________

Ответить с цитированием
  #3  
Старый 17.11.2007, 19:04
Аватар для moo2k
moo2k moo2k вне форума
Активный
 
Регистрация: 05.12.2006
Адрес: где-то там...
Сообщения: 321
Репутация: 35
По умолчанию

Код:
ListBox1.SelCount[];
__________________
Программирование - это искусство и наш смысл жизни.
Ответить с цитированием
  #4  
Старый 17.11.2007, 19:06
Аватар для Winny
Winny Winny вне форума
Продвинутый
 
Регистрация: 26.05.2007
Адрес: Планета земля, Россия, Москва
Сообщения: 620
Репутация: 30
По умолчанию

Можно и как я написал и как написал moo2k.
__________________

Ответить с цитированием
  #5  
Старый 18.11.2007, 11:39
Димарий Димарий вне форума
Прохожий
 
Регистрация: 17.11.2007
Сообщения: 4
Репутация: 10
По умолчанию

Нет вы меня не поняли совсем, это я знаю конечно.
Я имею ввиду КООРДИНАТЫ положения в плейлисте.
тоесть полодение курсора мыши. X, Y

Например в списке есть строки.

Вася пупкин,
Петя васин
Тётя мотя.

На тёте моте стоит курсор, эта строка Selected := True;
Мне надо ПРАВОЙ кнопкой навести на васю пупкина и в выпадающем меню выбрать инфо о пупкине, где он живет. Причем Selected должен оставаться на тёте моте.
Вот. Я в начале видать не так выразился. Мне не выделить по координатам а выдать индекс строки.
По selected я умею меню вызывать это просто. А вот как не отмеченную строку мышкой зацепить?

procedure TListF.CLBMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
FCursor: TPoint;
begin
if Button = mbRight then
begin
GetCursorPos(FCursor);
PopupMenu1.Popup(FCursor.X, FCursor.Y);
If ListF.CLB.Count = 0 Then Begin ShowMessage('А Нэту, да!');
Exit;
end;
FFileInfo.Show;
end;
end;

Вот так у меня получается но получается только посмотреть строку которая на данный момент Itemindex. Тоесть CheckListBox.Items.Strings[CheckListBox.Itemindex]
Тоесть я обрабатываю то что выделено. А мне надо обработать то что под курсором мыши находилось не перемещая выленение или фокус на эту строку..

Последний раз редактировалось Димарий, 18.11.2007 в 11:46.
Ответить с цитированием
  #6  
Старый 18.11.2007, 12:15
Аватар для mav_c
mav_c mav_c вне форума
Активный
 
Регистрация: 26.03.2007
Адрес: Москва
Сообщения: 287
Репутация: 30
По умолчанию

Цитата:
Сообщение от Димарий
Нет вы меня не поняли совсем, это я знаю конечно.
Я имею ввиду КООРДИНАТЫ положения в плейлисте.
тоесть полодение курсора мыши. X, Y

Например в списке есть строки.

Вася пупкин,
Петя васин
Тётя мотя.

На тёте моте стоит курсор, эта строка Selected := True;
Мне надо ПРАВОЙ кнопкой навести на васю пупкина и в выпадающем меню выбрать инфо о пупкине, где он живет. Причем Selected должен оставаться на тёте моте.
Вот. Я в начале видать не так выразился. Мне не выделить по координатам а выдать индекс строки.
По selected я умею меню вызывать это просто. А вот как не отмеченную строку мышкой зацепить?

procedure TListF.CLBMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
FCursor: TPoint;
begin
if Button = mbRight then
begin
GetCursorPos(FCursor);
PopupMenu1.Popup(FCursor.X, FCursor.Y);
If ListF.CLB.Count = 0 Then Begin ShowMessage('А Нэту, да!');
Exit;
end;
FFileInfo.Show;
end;
end;

Вот так у меня получается но получается только посмотреть строку которая на данный момент Itemindex. Тоесть CheckListBox.Items.Strings[CheckListBox.Itemindex]
Тоесть я обрабатываю то что выделено. А мне надо обработать то что под курсором мыши находилось не перемещая выленение или фокус на эту строку..

Код:
 Index := listbox1.ItemAtPos(Point(xCord, yCord), true);
__________________
---------------------------------------------
Программирование - не профессия, а стиль жизни

Последний раз редактировалось mav_c, 18.11.2007 в 12:19.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 01:44.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter