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

Text File | 1996-10-18 | 9KB | 386 lines

object FrmLabel: TFrmLabel
  Left = 200
  Top = 99
  BorderStyle = bsDialog
  Caption = 'RzLabel Editor'
  ClientHeight = 303
  ClientWidth = 476
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Position = poScreenCenter
  ShowHint = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 57
    Width = 36
    Height = 13
    Caption = 'Caption'
  end
  object RzLabel1: TRzLabel
    Left = 8
    Top = 4
    Width = 448
    Height = 26
    TextStyle = tsNormal
    Caption =
      'This form is a duplicate of the component editor for the RzLabel' +
      ' component.  The editor utilizes the RzFontComboBox and RzColorC' +
      'omboBox components.  In addition, RzTrackBar'
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    WordWrap = True
  end
  object RzLabel2: TRzLabel
    Left = 8
    Top = 30
    Width = 439
    Height = 13
    TextStyle = tsNormal
    Caption =
      'components, with owner-draw tick marks, are used for setting the' +
      ' font size and rotation angle.'
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    WordWrap = True
  end
  object RzLabel3: TRzLabel
    Left = 8
    Top = 272
    Width = 259
    Height = 26
    TextStyle = tsNormal
    Caption =
      'By the way, the highlighting labels on the main window were crea' +
      'ted using the RzLabel component.'
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    WordWrap = True
  end
  object PnlStyleTab: TRzPanel
    Left = 265
    Top = 53
    Width = 74
    Height = 22
    BorderOuter = fsButtonUp
    BorderSides = [sdLeft, sdTop, sdRight]
    Caption = 'Text Style'
    FrameSides = []
    TabOrder = 2
    OnMouseDown = PnlStyleTabMouseDown
  end
  object GrpPreview: TGroupBox
    Left = 8
    Top = 84
    Width = 173
    Height = 181
    Caption = 'Preview'
    TabOrder = 4
    object LblPreview: TRzLabel
      Left = 2
      Top = 15
      Width = 169
      Height = 164
      Hint = 'This is an RzLabel'
      Align = alClient
      Alignment = taCenter
      AutoSize = False
      Caption = 'Delphi'
      Font.Color = clNavy
      Font.Height = -24
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object BtnOK: TButton
    Left = 394
    Top = 272
    Width = 75
    Height = 25
    Caption = 'Done'
    ModalResult = 1
    TabOrder = 5
  end
  object PnlWorkspace: TRzPanel
    Left = 193
    Top = 72
    Width = 277
    Height = 193
    BorderOuter = fsButtonUp
    BorderWidth = 1
    FrameSides = []
    TabOrder = 3
    object NbkFormat: TNotebook
      Left = 3
      Top = 3
      Width = 271
      Height = 187
      Align = alClient
      TabOrder = 0
      object TPage
        Left = 0
        Top = 0
        Caption = 'Font'
        object Label2: TLabel
          Left = 4
          Top = 13
          Width = 28
          Height = 13
          Caption = 'Name'
        end
        object Label3: TLabel
          Left = 4
          Top = 92
          Width = 24
          Height = 13
          Caption = 'Color'
        end
        object Label6: TLabel
          Left = 4
          Top = 49
          Width = 20
          Height = 13
          Caption = 'Size'
        end
        object TrkPointSize: TRzTrackBar
          Left = 44
          Top = 37
          Width = 226
          Height = 40
          Max = 17
          Position = 0
          TickStyle = tkOwnerDraw
          TrackOffset = 22
          OnChange = TrkPointSizeChange
          OnDrawTick = TrkPointSizeDrawTick
          TabOrder = 1
        end
        object CbxFontColor: TRzColorComboBox
          Left = 48
          Top = 87
          Width = 165
          Height = 22
          Hint = 'This is an RzColorComboBox'
          About = aiRaizeComponents
          TabOrder = 2
          OnChange = CbxFontColorChange
        end
        object GrpFontStyle: TGroupBox
          Left = 48
          Top = 124
          Width = 165
          Height = 57
          Caption = 'Font Style'
          TabOrder = 3
          object ChkBold: TCheckBox
            Left = 9
            Top = 16
            Width = 68
            Height = 17
            Caption = 'Bold'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
            TabOrder = 0
            OnClick = ChkBoldClick
          end
          object ChkItalic: TCheckBox
            Left = 9
            Top = 34
            Width = 68
            Height = 17
            Caption = 'Italic'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsItalic]
            ParentFont = False
            TabOrder = 1
            OnClick = ChkItalicClick
          end
          object ChkStrikeout: TCheckBox
            Left = 85
            Top = 16
            Width = 68
            Height = 17
            Caption = 'Strikeout'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsStrikeOut]
            ParentFont = False
            TabOrder = 2
            OnClick = ChkStrikeoutClick
          end
          object ChkUnderline: TCheckBox
            Left = 85
            Top = 34
            Width = 68
            Height = 17
            Caption = 'Underline'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsUnderline]
            ParentFont = False
            TabOrder = 3
            OnClick = ChkUnderlineClick
          end
        end
        object CbxFonts: TRzFontComboBox
          Left = 48
          Top = 9
          Width = 217
          Height = 22
          Hint = 'This is an RzFontComboBox'
          About = aiRaizeComponents
          TabOrder = 0
          OnChange = CbxFontsChange
        end
      end
      object TPage
        Left = 0
        Top = 0
        Caption = 'Text Style'
        object GrpTextStyle: TRadioGroup
          Left = 8
          Top = 5
          Width = 89
          Height = 93
          Caption = 'Text Style'
          ItemIndex = 0
          Items.Strings = (
            'Normal'
            'Raised'
            'Recessed'
            'Shadow')
          TabOrder = 0
          OnClick = GrpTextStyleClick
        end
        object GrpShadow: TGroupBox
          Left = 104
          Top = 5
          Width = 161
          Height = 93
          Caption = 'Shadow Options'
          TabOrder = 1
          object Label4: TLabel
            Left = 8
            Top = 16
            Width = 24
            Height = 13
            Caption = 'Color'
          end
          object Label5: TLabel
            Left = 8
            Top = 66
            Width = 29
            Height = 13
            Caption = 'Depth'
          end
          object TrkShadow: TRzTrackBar
            Left = 40
            Top = 59
            Width = 117
            Height = 27
            Hint = 'RzTrackBar'
            Max = 25
            Position = 0
            ShowTicks = False
            TrackOffset = 10
            OnChange = TrkShadowChange
            Enabled = False
            TabOrder = 1
          end
          object CbxShadowColor: TRzColorComboBox
            Left = 8
            Top = 32
            Width = 145
            Height = 22
            Hint = 'RzColorComboBox'
            About = aiRaizeComponents
            SelectedColor = clBtnShadow
            TabOrder = 0
            OnChange = CbxShadowColorChange
          end
        end
        object GrpRotation: TGroupBox
          Left = 8
          Top = 104
          Width = 257
          Height = 77
          Caption = 'Rotation'
          TabOrder = 2
          object LblAngle: TLabel
            Left = 224
            Top = 51
            Width = 25
            Height = 13
            Alignment = taCenter
            AutoSize = False
            Caption = '0�'
          end
          object TrkAngle: TRzTrackBar
            Left = 8
            Top = 34
            Width = 213
            Hint = 'This is an RzTrackBar'
            Max = 360
            Position = 0
            TickStyle = tkOwnerDraw
            OnChange = TrkAngleChange
            OnDrawTick = TrkAngleDrawTick
            TabOrder = 1
          end
          object Chk15Degrees: TCheckBox
            Left = 9
            Top = 14
            Width = 181
            Height = 17
            Caption = 'Restrict to 15 Degree Increments'
            TabOrder = 0
            OnClick = Chk15DegreesClick
          end
        end
      end
    end
  end
  object PnlFontTab: TRzPanel
    Left = 193
    Top = 51
    Width = 74
    Height = 22
    BorderOuter = fsButtonUp
    BorderSides = [sdLeft, sdTop, sdRight]
    Caption = 'Font'
    FrameSides = []
    TabOrder = 1
    OnMouseDown = PnlFontTabMouseDown
  end
  object EdtCaption: TEdit
    Left = 52
    Top = 53
    Width = 129
    Height = 21
    TabOrder = 0
    OnChange = EdtCaptionChange
  end
end