Chip: Shareware for Win 95/Chip-Shareware-Win95.bin/ostatni/delphi/ruzne/rzcomps.exe/DEMO/PANELFRM.DF_/PANELFRM.DF/PANELFRM.txt

Text File | 1996-10-18 | 6KB | 299 lines

object FrmPanelEditor: TFrmPanelEditor
  Left = 200
  Top = 99
  BorderStyle = bsDialog
  Caption = 'RzPanel Editor'
  ClientHeight = 334
  ClientWidth = 370
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  PixelsPerInch = 96
  Position = poScreenCenter
  ShowHint = True
  OnClose = FormClose
  OnCreate = FormCreate
  TextHeight = 13
  object RzLabel1: TRzLabel
    Left = 30
    Top = 8
    Width = 309
    Height = 52
    TextStyle = tsNormal
    Alignment = taCenter
    Caption =
      'This form is a duplicate of the component editor for the RzPanel' +
      ' component.  The RzPanel component is highly customizable with 1' +
      '0 different border styles for both the inner and outer borders. ' +
      ' As you can see, it also supports word wrapping captions.'
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    WordWrap = True
  end
  object GrpBorder: TGroupBox
    Left = 8
    Top = 68
    Width = 161
    Height = 109
    Caption = 'Border Style'
    TabOrder = 0
    TabStop = True
    object LblOuter: TLabel
      Left = 8
      Top = 24
      Width = 26
      Height = 13
      Caption = 'Outer'
    end
    object LblInner: TLabel
      Left = 8
      Top = 52
      Width = 24
      Height = 13
      Caption = 'Inner'
    end
    object Label1: TLabel
      Left = 8
      Top = 80
      Width = 24
      Height = 13
      Caption = 'Color'
    end
    object CbxOuter: TComboBox
      Tag = 2
      Left = 40
      Top = 20
      Width = 113
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      Items.Strings = (
        'fsNone'
        'fsFlat'
        'fsGroove'
        'fsBump'
        'fsLowered'
        'fsButtonDown'
        'fsRaised'
        'fsButtonUp'
        'fsStatus'
        'fsPopup')
      TabOrder = 0
      OnChange = CbxOuterChange
    end
    object CbxInner: TComboBox
      Tag = 1
      Left = 40
      Top = 48
      Width = 113
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      Items.Strings = (
        'fsNone'
        'fsFlat'
        'fsGroove'
        'fsBump'
        'fsLowered'
        'fsButtonDown'
        'fsRaised'
        'fsButtonUp'
        'fsStatus'
        'fsPopup')
      TabOrder = 1
      OnChange = CbxInnerChange
    end
    object CbxBorderColor: TRzColorComboBox
      Left = 40
      Top = 76
      Width = 113
      Height = 22
      Hint = 'This is an RzColorComboBox'
      About = aiRaizeComponents
      TabOrder = 2
      OnChange = CbxBorderColorChange
    end
  end
  object GrpWidth: TGroupBox
    Left = 180
    Top = 184
    Width = 181
    Height = 57
    Caption = 'Border Width'
    TabOrder = 3
    TabStop = True
    object TrkWidth: TRzTrackBar
      Left = 6
      Top = 16
      Width = 171
      Hint = 'This is an RzTrackBar'
      Max = 25
      Position = 0
      TickStyle = tkOwnerDraw
      OnChange = TrkWidthChange
      OnDrawTick = TrkWidthDrawTick
      TabOrder = 0
    end
  end
  object GrpPreview: TGroupBox
    Left = 8
    Top = 184
    Width = 161
    Height = 141
    Caption = 'Preview'
    TabOrder = 4
    object PnlPreview: TRzPanel
      Left = 12
      Top = 20
      Width = 137
      Height = 109
      Hint = 'This is an RzPanel'
      BorderInner = fsLowered
      BorderColor = clTeal
      BorderWidth = 5
      Caption = 'Raize Your Software to a New Level!'
      FrameSides = []
      TabOrder = 0
    end
  end
  object GrpBorderSides: TGroupBox
    Left = 180
    Top = 68
    Width = 85
    Height = 109
    Caption = 'Border Sides'
    TabOrder = 1
    object ChkLeftBorder: TCheckBox
      Left = 8
      Top = 16
      Width = 37
      Height = 17
      Caption = 'Left'
      State = cbChecked
      TabOrder = 0
      OnClick = ChkBorderClick
    end
    object ChkTopBorder: TCheckBox
      Tag = 1
      Left = 8
      Top = 36
      Width = 37
      Height = 17
      Caption = 'Top'
      State = cbChecked
      TabOrder = 1
      OnClick = ChkBorderClick
    end
    object ChkRightBorder: TCheckBox
      Tag = 2
      Left = 8
      Top = 56
      Width = 49
      Height = 17
      Caption = 'Right'
      State = cbChecked
      TabOrder = 2
      OnClick = ChkBorderClick
    end
    object ChkBottomBorder: TCheckBox
      Tag = 3
      Left = 8
      Top = 76
      Width = 57
      Height = 17
      Caption = 'Bottom'
      State = cbChecked
      TabOrder = 3
      OnClick = ChkBorderClick
    end
  end
  object GrpFrameSides: TGroupBox
    Left = 276
    Top = 68
    Width = 85
    Height = 109
    Caption = 'Frame Sides'
    TabOrder = 2
    object ChkLeftFrame: TCheckBox
      Left = 8
      Top = 16
      Width = 37
      Height = 17
      Caption = 'Left'
      TabOrder = 0
      OnClick = ChkFrameClick
    end
    object ChkTopFrame: TCheckBox
      Tag = 1
      Left = 8
      Top = 36
      Width = 37
      Height = 17
      Caption = 'Top'
      TabOrder = 1
      OnClick = ChkFrameClick
    end
    object ChkRightFrame: TCheckBox
      Tag = 2
      Left = 8
      Top = 56
      Width = 45
      Height = 17
      Caption = 'Right'
      TabOrder = 2
      OnClick = ChkFrameClick
    end
    object ChkBottomFrame: TCheckBox
      Tag = 3
      Left = 8
      Top = 76
      Width = 57
      Height = 17
      Caption = 'Bottom'
      TabOrder = 3
      OnClick = ChkFrameClick
    end
  end
  object BtnOK: TButton
    Left = 289
    Top = 300
    Width = 75
    Height = 25
    Caption = 'Done'
    ModalResult = 1
    TabOrder = 5
  end
  object GrpAlignment: TRzRadioGroup
    Left = 180
    Top = 248
    Width = 101
    Height = 77
    ItemFont.Color = clWindowText
    ItemFont.Height = -11
    ItemFont.Name = 'MS Sans Serif'
    ItemFont.Style = []
    BorderOuter = fsRaised
    Caption = 'Caption Alignment'
    Columns = 3
    FrameSides = []
    ItemIndex = 4
    Items.Strings = (
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      ''
      '')
    TabOrder = 6
    OnClick = GrpAlignmentClick
  end
end