Examples Delphi

How to show the Horizontal scroll bar for a listbox.
sendmessage(ListBox.Handle, LB_SetHorizontalExtent, PixelWidth , 0);