Текущий архив: 2003.07.03;
Скачать: CL | DM;
Вниз
В ListBox хочу выделять Item правой кнопкой мыши. Найти похожие ветки
← →
LinOS © (2003-06-23 06:33) [0]В общем надо перед тем как появиться на ListBox-е Popup-у необходимо выделить итем над которым щелкнули для вызова Popup. Вроде должно быть просто, но что-то застопорило.
← →
Спрашивающий_ (2003-06-23 07:41) [1]Так устроит
procedure TForm1.ListBox1ContextPopup(Sender: TObject; MousePos: TPoint;
var Handled: Boolean);
var
Index:Word;
begin
Index:=ListBox1.ItemAtPos(MousePos,True);
SendMessage(ListBox1.Handle, LB_SETCARETINDEX ,Index,0 ) ;
Text:=ListBox1.Items[Index]; //Тест
end;
← →
LinOS © (2003-06-23 08:58) [2]>> SendMessage(ListBox1.Handle, LB_SETCARETINDEX ,Index,0 ) ;
А без API?
Я пишу с CLX библиотеками.
Страницы: 1 вся ветка
Текущий архив: 2003.07.03;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.013 c
