Как отловить нажатие по элементу ListBox а?

← →
_sMile (2003-05-20 20:46) [0]

Как отловить нажатие по элементу ListBox"а?

← →
Романов Р.В. © (2003-05-20 20:52) [1]

OnMouseDown
OnClick

← →
Palladin © (2003-05-20 20:54) [2]

интересно, а автор вообще в курсе что есть вкладка Events

← →
Zz_ (2003-05-20 20:57) [3]

procedure TfMain.WndProc(var Mes:TMessage);
begin
if(Mes.Msg=WM_COMMAND)then begin
if(Mes.WParamHi=LBN_SELCHANGE)then begin
ListBox.Items.Add("Index = "+IntToStr(SendMessage(Mes.LParam,LB_GETCURSEL,0,0)));
end else
if(Mes.WParamHi=LBN_DBLCLK)then begin
ListBox.Items.Add("Index = "+IntToStr(SendMessage(Mes.LParam,LB_GETCURSEL,0,0)));
end;

← →
AbrosimovA (2003-05-23 12:59) [4]

procedure TMainForm.ListBox1DblClick(Sender: TObject); var Num: integer; String1: string; begin Num:=ListBox1.ItemIndex;//Индех строки по которой нажали дважды String1:=ListBox.Items.Strings[Num]//Присвоить содержимого выбр.строки строковой переменной ListBox1.DeleteSelected;//Удаление выбранной строки end;

Как отловить нажатие по элементу ListBox а? Найти похожие ветки