Chip 2003 February/Chip_2003-02_cd1.bin/tema/siggis/siGGis.exe/0/RCDATA/TSETLAYERDIALOG/TSETLAYERDIALOG.txt

Text File | 2001-12-03 | 5KB | 281 lines

object SetLayerDialog: TSetLayerDialog
  Left = 117
  Top = 94
  BorderStyle = bsToolWindow
  Caption = 'Layer - setting'
  ClientHeight = 322
  ClientWidth = 192
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnHide = FormHide
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel2: TBevel
    Left = 8
    Top = 136
    Width = 177
    Height = 32
    Shape = bsFrame
    Style = bsRaised
  end
  object Bevel1: TBevel
    Left = 0
    Top = 0
    Width = 192
    Height = 322
    Align = alClient
  end
  object Label1: TLabel
    Left = 8
    Top = 10
    Width = 81
    Height = 13
    Caption = 'Current layer:'
  end
  object Label2: TLabel
    Left = 8
    Top = 35
    Width = 81
    Height = 13
    Caption = 'Outline color:'
  end
  object Label3: TLabel
    Left = 8
    Top = 83
    Width = 81
    Height = 13
    Caption = 'Filled color:'
  end
  object Label4: TLabel
    Left = 8
    Top = 108
    Width = 81
    Height = 13
    Caption = 'Style object'
  end
  object Label5: TLabel
    Left = 14
    Top = 143
    Width = 75
    Height = 13
    Caption = 'ObjectSize:'
  end
  object Label6: TLabel
    Left = 8
    Top = 179
    Width = 81
    Height = 13
    Caption = 'Label field:'
  end
  object ShObjectXx: TShape
    Left = 120
    Top = 144
    Width = 57
    Height = 17
    Brush.Style = bsClear
    Pen.Style = psClear
    OnMouseUp = ShObjectXxMouseUp
  end
  object Bevel3: TBevel
    Left = 8
    Top = 170
    Width = 177
    Height = 111
  end
  object Label7: TLabel
    Left = 16
    Top = 248
    Width = 89
    Height = 16
    Caption = 'AutoLabel:'
    Font.Color = clNavy
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object CBLayer: TComboBox
    Left = 88
    Top = 8
    Width = 97
    Height = 21
    ItemHeight = 13
    TabOrder = 0
    Text = '...'
    OnChange = CBLayerChange
  end
  object CBOline: TComboBox
    Left = 88
    Top = 32
    Width = 97
    Height = 21
    ItemHeight = 13
    Items.Strings = (
      'Aqua   '
      'Black  '
      'Blue   '
      'Fuchsia'
      'Gray   '
      'Green  '
      'Lime   '
      'Maroon '
      'Navy   '
      'Olive  '
      'Purple '
      'Red    '
      'Silver '
      'Teal   '
      'White  '
      'Yellow ')
    TabOrder = 1
    Text = '...'
    OnChange = CBOlineChange
  end
  object CBFill: TComboBox
    Left = 88
    Top = 80
    Width = 97
    Height = 21
    ItemHeight = 13
    Items.Strings = (
      'Aqua   '
      'Black  '
      'Blue   '
      'Fuchsia'
      'Gray   '
      'Green  '
      'Lime   '
      'Maroon '
      'Navy   '
      'Olive  '
      'Purple '
      'Red    '
      'Silver '
      'Teal   '
      'White  '
      'Yellow ')
    TabOrder = 4
    Text = '...'
    OnChange = CBFillChange
  end
  object CBType: TComboBox
    Left = 88
    Top = 104
    Width = 97
    Height = 21
    ItemHeight = 13
    TabOrder = 5
    Text = '...'
    OnChange = CBTypeChange
  end
  object ChBOline1: TCheckBox
    Left = 8
    Top = 58
    Width = 89
    Height = 17
    Caption = 'single outline '
    Color = clBtnFace
    ParentColor = False
    State = cbChecked
    TabOrder = 2
    OnClick = ChBOline1Click
  end
  object ChBOline2: TCheckBox
    Left = 96
    Top = 58
    Width = 89
    Height = 17
    Caption = 'double outline'
    TabOrder = 3
    OnClick = ChBOline2Click
  end
  object ButSet: TButton
    Left = 104
    Top = 292
    Width = 73
    Height = 25
    Caption = 'Accept'
    TabOrder = 7
    OnClick = ButSetClick
  end
  object ESize: TEdit
    Left = 88
    Top = 141
    Width = 25
    Height = 21
    TabOrder = 6
    Text = '10'
    OnExit = ESizeExit
  end
  object CBLabel: TComboBox
    Left = 88
    Top = 176
    Width = 97
    Height = 21
    ItemHeight = 13
    TabOrder = 8
    Text = '...'
  end
  object PFont: TPanel
    Left = 10
    Top = 200
    Width = 173
    Height = 33
    Hint = 'dblClik - setting dialog'
    Caption = 'Set Label font'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 9
    OnDblClick = PFontDblClick
  end
  object DB: TButton
    Left = 16
    Top = 292
    Width = 75
    Height = 25
    Caption = 'Default'
    Enabled = False
    TabOrder = 10
    OnClick = DBClick
  end
  object BLabDraw: TButton
    Left = 104
    Top = 238
    Width = 73
    Height = 19
    Caption = 'Draw'
    TabOrder = 11
    OnClick = BLabDrawClick
  end
  object BLabClear: TButton
    Left = 104
    Top = 257
    Width = 73
    Height = 19
    Caption = 'Clear'
    TabOrder = 12
    OnClick = BLabClearClick
  end
  object FD: TFontDialog
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 8
    Top = 200
  end
end