object frmMain: TfrmMain Left = 216 Height = 403 Top = 153 Width = 709 HorzScrollBar.Page = 713 VertScrollBar.Page = 439 ActiveControl = lbFamily Caption = 'Font Enumeration' ClientHeight = 403 ClientWidth = 709 OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnShow = FormShow ShowHint = True LCLVersion = '2.3.0.0' object lflFontFaceList: TLabel AnchorSideLeft.Control = lbFamily AnchorSideTop.Control = lblFilter Left = 222 Height = 15 Top = 16 Width = 67 Caption = 'Face font list' end object lblStyles: TLabel AnchorSideLeft.Control = lbStyles AnchorSideTop.Control = lblFilter Left = 416 Height = 15 Top = 16 Width = 30 Caption = 'Styles' end object lblSizes: TLabel AnchorSideLeft.Control = lbSizes AnchorSideTop.Control = lblFilter Left = 624 Height = 15 Top = 16 Width = 25 Caption = 'Sizes' end object lblCharset: TLabel AnchorSideLeft.Control = lbStyles AnchorSideTop.Control = lbSizes AnchorSideTop.Side = asrCenter Left = 416 Height = 15 Top = 145 Width = 41 Caption = 'CharSet' end object lblFilter: TLabel AnchorSideLeft.Control = Owner AnchorSideTop.Control = Owner Left = 16 Height = 15 Top = 16 Width = 26 BorderSpacing.Left = 16 BorderSpacing.Top = 16 Caption = 'Filter' end object lbFamily: TListBox AnchorSideLeft.Control = cbCharset AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = cbCharset AnchorSideRight.Control = lbStyles Left = 222 Height = 239 Top = 33 Width = 186 Anchors = [akTop, akLeft, akRight] BorderSpacing.Left = 12 BorderSpacing.Right = 8 ItemHeight = 0 OnClick = lbFamilyClick TabOrder = 0 end object cbCharset: TComboBox AnchorSideLeft.Control = lblFilter AnchorSideTop.Control = lblFilter AnchorSideTop.Side = asrBottom Left = 16 Height = 23 Top = 33 Width = 194 BorderSpacing.Top = 2 DropDownCount = 24 ItemHeight = 15 TabOrder = 1 Text = 'ANSI_CHARSET' end object btnApplyFilter: TButton AnchorSideLeft.Control = lblFilter AnchorSideTop.Control = cbPitch AnchorSideTop.Side = asrBottom Left = 16 Height = 33 Top = 99 Width = 92 AutoSize = True BorderSpacing.Top = 16 BorderSpacing.InnerBorder = 4 Caption = 'Apply filter' OnClick = btnApplyFilterClick TabOrder = 2 end object lbStyles: TListBox AnchorSideTop.Control = cbCharset AnchorSideRight.Control = lbSizes AnchorSideBottom.Control = lblCharset Left = 416 Height = 104 Top = 33 Width = 200 Anchors = [akTop, akRight, akBottom] BorderSpacing.Right = 8 BorderSpacing.Bottom = 8 ItemHeight = 0 OnClick = lbStylesClick TabOrder = 3 end object lbSizes: TListBox AnchorSideLeft.Control = chkUnderLine AnchorSideTop.Control = cbCharset AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = lbFamily AnchorSideBottom.Side = asrBottom Left = 624 Height = 239 Top = 33 Width = 69 Anchors = [akTop, akRight, akBottom] BorderSpacing.Right = 16 ItemHeight = 0 OnClick = lbSizesClick TabOrder = 4 end object lbCharset: TListBox AnchorSideLeft.Control = lbStyles AnchorSideTop.Control = lblCharset AnchorSideTop.Side = asrBottom AnchorSideRight.Control = lbSizes AnchorSideBottom.Control = lbFamily AnchorSideBottom.Side = asrBottom Left = 416 Height = 110 Top = 162 Width = 200 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Top = 2 BorderSpacing.Right = 8 ItemHeight = 0 OnClick = lbCharsetClick TabOrder = 5 end object cbPitch: TComboBox AnchorSideLeft.Control = lblFilter AnchorSideTop.Control = cbCharset AnchorSideTop.Side = asrBottom AnchorSideRight.Control = cbCharset AnchorSideRight.Side = asrBottom Left = 16 Height = 23 Top = 60 Width = 194 BorderSpacing.Top = 4 DropDownCount = 24 ItemHeight = 15 ItemIndex = 0 Items.Strings = ( 'DEFAULT_PITCH' 'FIXED_PITCH' 'VARIABLE_PITCH' 'MONO_FONT' ) TabOrder = 6 Text = 'DEFAULT_PITCH' end object btnFontDlg: TButton AnchorSideLeft.Control = btnResetText AnchorSideTop.Control = btnResetText AnchorSideTop.Side = asrBottom AnchorSideRight.Control = btnResetText AnchorSideRight.Side = asrBottom Left = 81 Height = 33 Top = 321 Width = 129 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Top = 8 BorderSpacing.InnerBorder = 4 Caption = 'Font Dlg' OnClick = btnFontDlgClick TabOrder = 7 end object chkStrike: TCheckBox AnchorSideLeft.Control = chkUnderLine AnchorSideTop.Control = grid Left = 624 Height = 19 Top = 280 Width = 65 Caption = 'Strikeout' OnChange = chkStrikeChange TabOrder = 8 end object chkUnderLine: TCheckBox AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = chkStrike AnchorSideTop.Side = asrBottom AnchorSideRight.Control = lbSizes AnchorSideRight.Side = asrBottom Left = 624 Height = 19 Top = 303 Width = 69 Anchors = [akTop, akRight] BorderSpacing.Top = 4 Caption = 'Underline' OnChange = chkUnderLineChange TabOrder = 9 end object btnResetText: TButton AnchorSideTop.Control = grid AnchorSideRight.Control = cbPitch AnchorSideRight.Side = asrBottom Left = 81 Height = 33 Top = 280 Width = 129 Anchors = [akTop, akRight] AutoSize = True BorderSpacing.InnerBorder = 4 Caption = 'Reset Sample Text' OnClick = btnResetTextClick TabOrder = 10 end object grid: TStringGrid AnchorSideLeft.Control = lbFamily AnchorSideTop.Control = lbFamily AnchorSideTop.Side = asrBottom AnchorSideRight.Control = chkUnderLine AnchorSideBottom.Control = Owner AnchorSideBottom.Side = asrBottom Left = 222 Height = 107 Top = 280 Width = 394 Anchors = [akTop, akLeft, akRight, akBottom] AutoFillColumns = True BorderSpacing.Top = 8 BorderSpacing.Right = 8 BorderSpacing.Bottom = 16 ColCount = 1 DefaultRowHeight = 17 FixedCols = 0 FixedRows = 0 Options = [goFixedVertLine, goFixedHorzLine, goHorzLine, goRangeSelect, goEditing, goThumbTracking, goSmoothScroll] TabOrder = 11 ColWidths = ( 390 ) end object FontDialog1: TFontDialog MinFontSize = 0 MaxFontSize = 0 Left = 248 Top = 320 end end