object TaskPropDlg: TTaskPropDlg Left = 263 Top = 115 HelpContext = 59 ActiveControl = OKBtn BorderStyle = bsDialog Caption = 'Taskbar Properties' ClientHeight = 304 ClientWidth = 316 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] PixelsPerInch = 96 Position = poScreenCenter OnCreate = FormCreate TextHeight = 13 object OKBtn: TBitBtn Left = 74 Top = 272 Width = 77 Height = 27 TabOrder = 1 OnClick = OKBtnClick Kind = bkOK Margin = 4 Style = bsNew Spacing = -1 IsControl = True end object CancelBtn: TBitBtn Left = 154 Top = 272 Width = 77 Height = 27 TabOrder = 2 Kind = bkCancel Margin = 4 Style = bsNew Spacing = -1 IsControl = True end object Notebook: TTabbedNotebook Left = 2 Top = 0 Width = 311 Height = 269 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] TabFont.Color = clBtnText TabFont.Height = -11 TabFont.Name = 'MS Sans Serif' TabFont.Style = [] TabOrder = 0 object TTabPage Left = 5 Top = 26 Caption = 'Preferences' object CheckList: TCheckList Left = 10 Top = 12 Width = 281 Height = 202 Color = clBtnFace IntegralHeight = True ItemHeight = 20 Items.Strings = ( 'Keep the taskbar on screen all the time' 'Depress the button of the current/active task' 'Fit maximized windows to space above taskbar' 'Show clock in 24 hour format' 'Popup resources over the clock' 'Popup full date over the clock' 'Animate the taskbar when popping up' 'Display full window captions as button hints' 'Move minimized window icons above the bar' 'Hide the icons of minimized applications' 'Show buttons for icon windows' 'Show button for Explorer window' 'Show full MS-DOS path on icon window buttons' 'Use icons from start menu and shortcuts/aliases' 'Display document filename before program name' 'Change document name to lower case text') TabOrder = 0 end end object TTabPage Left = 5 Top = 26 Caption = 'Advanced' object Bevel1: TBevel Left = 12 Top = 184 Width = 279 Height = 41 Shape = bsFrame end object Label1: TLabel Left = 10 Top = 12 Width = 61 Height = 13 Caption = '&Exclusions' FocusControl = ExcludeList Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object AddBtn: TStyleSpeed Left = 146 Top = 146 Width = 71 Height = 23 Caption = '&Add' OnClick = AddBtnClick Style = sbBitBtn end object RemoveBtn: TStyleSpeed Left = 220 Top = 146 Width = 71 Height = 23 Caption = '&Remove' OnClick = RemoveBtnClick Style = sbBitBtn end object Label2: TLabel Left = 24 Top = 198 Width = 123 Height = 13 Caption = 'Re&fresh interval (seconds)' FocusControl = RefreshEdit end object ExcludeList: TListBox Left = 10 Top = 46 Width = 281 Height = 93 ItemHeight = 16 Style = lbOwnerDrawFixed TabOrder = 0 OnDrawItem = ExcludeListDrawItem end object Header: THeader Left = 10 Top = 28 Width = 281 Height = 19 Sections.Sections = ( #0'141'#0'Module name' #0'62'#0'Class name') TabOrder = 1 end object RefreshEdit: TSpinEdit Left = 162 Top = 194 Width = 79 Height = 22 MaxValue = 60 MinValue = 1 TabOrder = 2 Value = 5 end end end object HelpBtn: TBitBtn Left = 234 Top = 272 Width = 77 Height = 27 TabOrder = 3 Kind = bkHelp Margin = 4 Style = bsNew Spacing = -1 end end