Kompuutteri Kaikille K-CD 2008 #18/KCD200818.ISO/CD.EXE/0/RCDATA/TLMDRICHFRMPARAGRAPH/TLMDRICHFRMPARAGRAPH.txt

Text File | 2008-06-16 | 6KB | 338 lines

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