object LMDRichfrmParagraph: TLMDRichfrmParagraph BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Paragraph' ClientHeight = 240 ClientWidth = 410 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Scaled = False Left = 8 Top = 8 OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object lblJustify: TLabel Caption = '&Justify:' FocusControl = cbxJustify Left = 6 Top = 16 Width = 32 Height = 13 end object lblHeading: TLabel Caption = '&Heading:' Visible = False Left = 204 Top = 20 Width = 43 Height = 13 end object Bevel1: TBevel Shape = bsTopLine Left = 52 Top = 46 Width = 345 Height = 3 end object lblMargins: TLabel Caption = 'Margins' Left = 6 Top = 41 Width = 37 Height = 13 end object lblLeftMargin: TLabel Caption = 'left:' Left = 52 Top = 60 Width = 17 Height = 13 end object lblRightMargin: TLabel Caption = 'right:' Left = 52 Top = 88 Width = 23 Height = 13 end object lblFirstLine: TLabel Caption = 'first line:' FocusControl = cbxIndent Left = 198 Top = 58 Width = 38 Height = 13 end object lblIndentAt: TLabel Caption = 'at:' FocusControl = edtIndentAt Left = 312 Top = 56 Width = 12 Height = 13 end object Bevel2: TBevel Shape = bsTopLine Left = 52 Top = 130 Width = 345 Height = 3 end object lblIntervals: TLabel Caption = 'Intervals' Left = 6 Top = 125 Width = 40 Height = 13 end object lblBefore: TLabel Caption = 'before:' Left = 52 Top = 144 Width = 33 Height = 13 end object lblAfter: TLabel Caption = 'after:' Left = 52 Top = 172 Width = 24 Height = 13 end object lblLineSpacing: TLabel Caption = 'line spacing:' FocusControl = cbxLineSpacing Left = 198 Top = 141 Width = 59 Height = 13 end object lblValue: TLabel Caption = 'value:' FocusControl = edtLineSpacingValue Left = 312 Top = 140 Width = 29 Height = 13 end object Bevel3: TBevel Shape = bsTopLine Left = 4 Top = 198 Width = 396 Height = 3 end object btnTabstops: TButton Anchors = [akLeft, akBottom] Caption = '&Tabstops' ModalResult = 6 TabOrder = 10 Left = 6 Top = 210 Width = 75 Height = 24 end object btnCancel: TButton Anchors = [akRight, akBottom] Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 12 Left = 326 Top = 210 Width = 75 Height = 24 end object btnOK: TButton Anchors = [akRight, akBottom] Caption = 'OK' Default = True ModalResult = 1 TabOrder = 11 Left = 246 Top = 210 Width = 75 Height = 24 end object cbxJustify: TComboBox Style = csOwnerDrawFixed ItemHeight = 18 TabOrder = 0 Items.Strings = ( 'Left' 'Center' 'Right') Left = 91 Top = 11 Width = 129 Height = 24 OnDrawItem = cbxJustifyDrawItem end object cbxHeading: TComboBox Style = csOwnerDrawFixed ItemHeight = 18 TabOrder = 1 Visible = False Items.Strings = ( 'Normal text' 'Heading 1' 'Heading 2' 'Heading 3' 'Heading 4' 'Heading 5' 'Heading 6' 'Heading 7' 'Heading 8' 'Heading 9') Left = 264 Top = 16 Width = 133 Height = 24 OnDrawItem = cbxHeadingDrawItem end object edtLeftMargin: TEdit TabOrder = 2 Text = '0' Left = 92 Top = 56 Width = 65 Height = 21 OnKeyPress = edtDigitsKeyPress end object edtRightMargin: TEdit TabOrder = 3 Text = '0' Left = 92 Top = 84 Width = 65 Height = 21 OnKeyPress = edtDigitsKeyPress end object udLeftMargin: TUpDown Associate = edtLeftMargin Max = 10000 TabOrder = 13 Left = 157 Top = 56 Width = 15 Height = 21 OnChangingEx = udLeftMarginChangingEx end object udRightMargin: TUpDown Associate = edtRightMargin Max = 1000 TabOrder = 14 Left = 157 Top = 84 Width = 15 Height = 21 end object cbxIndent: TComboBox Style = csDropDownList ItemHeight = 13 TabOrder = 4 Items.Strings = ( '(none)' 'indent' 'unindent') Left = 198 Top = 73 Width = 89 Height = 21 OnChange = cbxIndentChange end object edtIndentAt: TEdit Enabled = False TabOrder = 5 Text = '0' Left = 312 Top = 72 Width = 69 Height = 21 OnKeyPress = edtDigitsKeyPress end object udIndentAt: TUpDown Associate = edtIndentAt Max = 1000 TabOrder = 15 Left = 381 Top = 72 Width = 15 Height = 21 end object edtBeforeInterval: TEdit TabOrder = 6 Text = '0' Left = 92 Top = 140 Width = 65 Height = 21 OnKeyPress = edtDigitsKeyPress end object edtAfterInterval: TEdit TabOrder = 7 Text = '0' Left = 92 Top = 168 Width = 65 Height = 21 OnKeyPress = edtDigitsKeyPress end object udBeforeInterval: TUpDown Associate = edtBeforeInterval TabOrder = 16 Left = 157 Top = 140 Width = 15 Height = 21 end object udAfterInterval: TUpDown Associate = edtAfterInterval TabOrder = 17 Left = 157 Top = 168 Width = 15 Height = 21 end object cbxLineSpacing: TComboBox Style = csDropDownList ItemHeight = 13 TabOrder = 8 Items.Strings = ( 'single' 'one-and-half' 'double' 'minimum' 'exactly' 'multiplier') Left = 198 Top = 157 Width = 89 Height = 21 OnChange = cbxLineSpacingChange end object edtLineSpacingValue: TEdit TabOrder = 9 Text = '0' Left = 312 Top = 156 Width = 69 Height = 21 OnKeyPress = edtDigitsKeyPress end object udLineSpacingValue: TUpDown Associate = edtLineSpacingValue Max = 1000 TabOrder = 18 Left = 381 Top = 156 Width = 15 Height = 21 end end