Chip 2002 March/Chip_2002-03_cd1.bin/zkuste/delphi/kompon/d123456/SRVALEDT.ZIP/Demo/ValMain.dfm/ValMain.txt

Text File | 2001-12-18 | 5.4 KB | 226 lines

object MainForm: TMainForm
  Left = 172
  Top = 63
  Width = 409
  Height = 241
  Caption = 'TSRValueEdit - Demo'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 176
    Width = 313
    Height = 29
    AutoSize = False
    Caption =
      'Drei mal TSRValueEdit mit ganz unterschiedlichen Eigenschaften: ' +
      'Einfach mal ausprobieren, was passiert!'
    WordWrap = True
  end
  object SRValueEdit1: TSRValueEdit
    Left = 56
    Top = 60
    Width = 69
    Height = 100
    BevelStyle = bvRaised
    BevelWidth = 1
    BorderWidth = 4
    CaptureMouse = False
    Colors.Background = clBtnFace
    Colors.NumBackground = clBlack
    Colors.NumFrame = clWindowFrame
    Colors.Ruler = clBtnFace
    Colors.SliderBorder = clSilver
    Colors.SliderTop = clBtnFace
    Colors.SliderMark = clBlue
    Colors.TickMarks = clBtnText
    DecSeparator = '.'
    DecSeparatorPos = 0
    FocusRect = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clLime
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    MaxValue = 1000.000000000000000000
    MinValue = -99.990000000000000000
    NumDigits = 4
    ScrewSize = 8
    ShowScrews = False
    RulerDirection = rdVertical
    SliderEditLength = 140
    SliderEditWidth = 36
    SliderWidth = 12
    SpinBtnHeight = 10
    SpinControlWidth = 25
    TabOrder = 0
    TickStyle = tsAll
    ValueHistory = False
  end
  object Panel1: TPanel
    Left = 256
    Top = 12
    Width = 137
    Height = 148
    TabOrder = 1
    object SRValueEdit2: TSRValueEdit
      Left = 20
      Top = 9
      Width = 97
      Height = 131
      BevelStyle = bvLowered
      BevelWidth = 3
      BorderWidth = 1
      CaptureMouse = True
      Colors.Background = clTeal
      Colors.NumBackground = clNavy
      Colors.NumFrame = clSilver
      Colors.Ruler = clBtnFace
      Colors.SliderBorder = clBlue
      Colors.SliderTop = clNavy
      Colors.SliderMark = clAqua
      Colors.TickMarks = clAqua
      DecSeparator = ','
      DecSeparatorPos = 1
      FocusRect = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clFuchsia
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      MaxValue = 999.900000000000000000
      MinValue = -999.900000000000000000
      NumDigits = 4
      ScrewSize = 8
      ShowScrews = True
      RulerDirection = rdVertical
      SliderEditLength = 180
      SliderEditWidth = 50
      SliderWidth = 18
      SpinBtnHeight = 10
      SpinControlWidth = 30
      TabOrder = 0
      TabStop = True
      TickStyle = tsMinMax
      ValueHistory = True
    end
  end
  object SRValueEdit3: TSRValueEdit
    Left = 140
    Top = 60
    Width = 101
    Height = 100
    BevelStyle = bvRaised
    BevelWidth = 1
    BorderWidth = 4
    CaptureMouse = True
    Colors.Background = clBtnFace
    Colors.NumBackground = clWhite
    Colors.NumFrame = clWindowFrame
    Colors.Ruler = clBtnFace
    Colors.SliderBorder = clYellow
    Colors.SliderTop = clWhite
    Colors.SliderMark = clBlue
    Colors.TickMarks = clBtnText
    DecSeparator = '.'
    DecSeparatorPos = 2
    FocusRect = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    MaxValue = 9999.990000000000000000
    MinValue = -1000.000000000000000000
    NumDigits = 6
    ScrewSize = 8
    ShowScrews = False
    RulerDirection = rdHorizontal
    SliderEditLength = 200
    SliderEditWidth = 36
    SliderWidth = 16
    SpinBtnHeight = 10
    SpinControlWidth = 29
    TabOrder = 2
    TickStyle = tsAll
    ValueHistory = True
  end
  object SliderEdit1: TSliderEdit
    Left = 8
    Top = 12
    Width = 36
    Height = 149
    BevelStyle = bvRaised
    BevelWidth = 1
    BorderWidth = 2
    Colors.Background = clBtnFace
    Colors.NumBackground = clBlack
    Colors.NumFrame = clWindowFrame
    Colors.Ruler = clBtnFace
    Colors.SliderBorder = clSilver
    Colors.SliderTop = clBtnFace
    Colors.SliderMark = clBlue
    Colors.TickMarks = clBtnText
    DisplayWidth = 30
    FocusRect = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clLime
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    LargeChange = 100
    MaxValue = 100
    MediumChange = 10
    MinValue = 0
    SmallChange = 1
    RulerDirection = rdVertical
    SliderWidth = 14
    SpinBtnHeight = 10
    TabOrder = 3
    TickStyle = tsAll
    Value = 0
  end
  object SliderEdit2: TSliderEdit
    Left = 56
    Top = 12
    Width = 185
    Height = 36
    BevelStyle = bvRaised
    BevelWidth = 1
    BorderWidth = 2
    Colors.Background = clMaroon
    Colors.NumBackground = clBlack
    Colors.NumFrame = clWindowFrame
    Colors.Ruler = clRed
    Colors.SliderBorder = clWhite
    Colors.SliderTop = clBlack
    Colors.SliderMark = clYellow
    Colors.TickMarks = clYellow
    DisplayWidth = 30
    FocusRect = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clRed
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    LargeChange = 30
    MaxValue = 127
    MediumChange = 10
    MinValue = -128
    SmallChange = 1
    RulerDirection = rdHorizontal
    SliderWidth = 14
    SpinBtnHeight = 10
    TabOrder = 4
    TickStyle = tsAll
    Value = 0
  end
end