forum.boolean.name

forum.boolean.name (http://forum.boolean.name/index.php)
-   Delphi (http://forum.boolean.name/forumdisplay.php?f=66)
-   -   listbox над каким элементов находится курсор (http://forum.boolean.name/showthread.php?t=12363)

Winner 12.04.2010 23:58

listbox над каким элементов находится курсор
 
При нажатии левой кнопки мыши на listbox выделяется элемент, над которым находится курсор. Я хочу сделать то же и самое для нажатия правой кнопки мыши. Подскажите, пожалуйста, как это сделать.

WaReZ_MEN 13.04.2010 10:17

Ответ: listbox над каким элементов находится курсор
 
Можно перехватить сообщения мши и послать прывай клик :)

Winner 13.04.2010 20:09

Ответ: listbox над каким элементов находится курсор
 
procedure Tform1.ListBox1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if ssright in shift then
listbox1.itemindex:=listbox1.ItemAtPos(Point(x,y), true);
end;

То, что мне было нужно. Тему можно закрывать. Спасибо.


Часовой пояс GMT +4, время: 09:16.

vBulletin® Version 3.6.5.
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Перевод: zCarot