TSTDLG08TPF0TSTDlgSTDlgLeftTopWidthHeight,CaptionStSorter Example Font.Color clWindowText Font.Height Font.Name MS Sans Serif Font.Style ShowHint OnActivate FormActivate PixelsPerInch` TextHeight TLabelLabel1LeftZTopWidthFHeight CaptionItems (1..5000)TListBoxLB1LeftTopWidthHeightHint Unsorted ListTabStop Font.ColorclBlack Font.Height Font.Name Courier New Font.Style ItemHeight ParentFontTabOrderTListBoxLB2LeftTopWidthHeightHint Sorted ListTabStop Font.ColorclBlack Font.Height Font.Name Courier New Font.Style ItemHeight ParentFontTabOrderTButtonNewBtnLeft\TopHWidthGHeight#HintCreate New ListCaptionNew ListTabOrderOnClick NewBtnClickTButton SorterBtnLeft\TopWidthGHeight#Hint Sort ListCaptionSortTabOrderOnClickSorterBtnClickTButtonBtn4Left\TopWidthGHeight#Hint Exit programCaptionExitTabOrderOnClick Btn4ClickTEditEdit1Left\Top.WidthEHeightHint# items in listTabOrder