[SOLVED]ListBox Not Selecting Text When Clicking On Up/Down Arrow Control

[Knipfty]

Hi All,

I created a ListBox on a Panel within a Form.  It contains 3 values in the string list.

When I just click on the little up/down arrows and not the text in the ListBox, no event handler is triggered.  I can see this because the highlight color within the List Box does not change until I actually click on the text within the ListBox.

I have the following events all pointing to the same event handler:
onChange
OnChangeBounds
OnClick
OnEnter
Onexit
OnResize

It almost as if the up/down control needs its own event handler, but I don't see one.

In case it helps, the following properties are set at design time:
ClickOnSelChange=true
ExtendedSelect = true
MultiSelect = false

I've tried turning them off individually to no avail...

Thanks

[Curt Carpenter]

I think the little up and down arrows on the listbox are only meant to scroll the items visible in the box knipfty.   They don't generate any external events. 

This is the way they work here -- I don't get any events either:  only the scrolling action.  (I'm using WinXP and Lazarus 0.9.30.4).   

[howardpc]

The arrows on a listbox scrollbar are designed for scrolling into view the hidden part of an item list that is too long for every item to be fully visible.
To change the listbox selection using visual arrows you need an external UpDown control (the 7th control on the Common Controls tab of the Component Palette).
Drop it near a listbox, and set its Associate property to the listbox. Double-click the UpDown's OnClick event and add this code

Code: [Select]

procedure TForm1.UpDown1Click(Sender: TObject; Button: TUDBtnType);
begin
  if (ListBox1.Items.Count < 2) or (ListBox1.ItemIndex < 0) then Exit;
  case Button of
   btNext: if (ListBox1.ItemIndex > 0)
             then ListBox1.ItemIndex := ListBox1.ItemIndex - 1;
   btPrev: if (ListBox1.ItemIndex < ListBox1.Items.Count - 1)
             then ListBox1.ItemIndex := ListBox1.ItemIndex + 1;
  end;
end;     

Howard

[Knipfty]

Thanks Curt as you have confirmed my observation.  At least now I know its not something I am doing.

howard, I never considered adding another control next to the one I am already using.  Thanks for thinking outside the box.  Right now I trying to figure out if I should use your suggestion or convert the the control to a radio box since there are only 3 items.

Knipfty