mainform.dfm

jvcl driver development envionment

object frmMain: TfrmMain
  Left = 192
  Top = 107
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'JvCaptionButton Demo'
  ClientHeight = 467
  ClientWidth = 369
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object lblPos: TLabel
    Left = 80
    Top = 13
    Width = 3
    Height = 13
  end
  object Label7: TLabel
    Left = 8
    Top = 126
    Width = 65
    Height = 13
    Caption = 'Button &Width:'
    FocusControl = tbBtnWidth
  end
  object Label6: TLabel
    Left = 8
    Top = 353
    Width = 36
    Height = 13
    Caption = 'E&vents:'
    FocusControl = meEvents
  end
  object Label5: TLabel
    Left = 140
    Top = 53
    Width = 22
    Height = 13
    Caption = 'H&int:'
    FocusControl = edHint
  end
  object Label4: TLabel
    Left = 140
    Top = 181
    Width = 57
    Height = 13
    Caption = '&BorderStyle:'
    FocusControl = cbBorderStyle
  end
  object Label3: TLabel
    Left = 8
    Top = 181
    Width = 61
    Height = 13
    Caption = 'Button T&ype:'
    FocusControl = cbStandard
  end
  object Label2: TLabel
    Left = 140
    Top = 11
    Width = 39
    Height = 13
    Caption = '&Caption:'
    FocusControl = edCaption
  end
  object Label1: TLabel
    Left = 8
    Top = 13
    Width = 40
    Height = 13
    Caption = '&Position:'
    FocusControl = udPosition
  end
  object Bevel1: TBevel
    Left = 4
    Top = 169
    Width = 361
    Height = 5
    Anchors = [akLeft, akTop, akRight]
    Shape = bsTopLine
  end
  object udPosition: TUpDown
    Left = 56
    Top = 8
    Width = 16
    Height = 24
    Min = 0
    Position = 0
    TabOrder = 0
    Wrap = False
    OnClick = udPositionClick
  end
  object tbBtnWidth: TTrackBar
    Left = 6
    Top = 144
    Width = 361
    Height = 18
    Anchors = [akLeft, akTop, akRight]
    Max = 200
    Orientation = trHorizontal
    ParentShowHint = False
    Frequency = 1
    Position = 0
    SelEnd = 0
    SelStart = 0
    ShowHint = True
    TabOrder = 1
    ThumbLength = 9
    TickMarks = tmBottomRight
    TickStyle = tsNone
    OnChange = tbBtnWidthChange
  end
  object meEvents: TMemo
    Left = 8
    Top = 372
    Width = 354
    Height = 65
    Anchors = [akLeft, akTop, akRight, akBottom]
    ScrollBars = ssVertical
    TabOrder = 2
  end
  object gbButtons: TGroupBox
    Left = 8
    Top = 233
    Width = 354
    Height = 73
    Anchors = [akLeft, akTop, akRight]
    Caption = ' Standard Buttons: '
    TabOrder = 3
    object chkSysMenu: TCheckBox
      Left = 12
      Top = 18
      Width = 90
      Height = 17
      Caption = 'System &Menu'
      TabOrder = 0
      OnClick = chkSysMenuClick
    end
    object chkMax: TCheckBox
      Left = 12
      Top = 42
      Width = 90
      Height = 17
      Caption = 'Ma&ximize'
      TabOrder = 1
      OnClick = chkMaxClick
    end
    object chkMin: TCheckBox
      Left = 192
      Top = 18
      Width = 80
      Height = 17
      Caption = 'Minimi&ze'
      TabOrder = 2
      OnClick = chkMinClick
    end
    object chkHelp: TCheckBox
      Left = 192
      Top = 42
      Width = 80
      Height = 17
      Caption = '&Help'
      TabOrder = 3
      OnClick = chkHelpClick
    end
  end
  object edHint: TEdit
    Left = 140
    Top = 69
    Width = 223
    Height = 21
    Anchors = [akLeft, akTop, akRight]
    TabOrder = 4
    OnClick = edHintClick
  end
  object edCaption: TEdit
    Left = 140
    Top = 27
    Width = 223
    Height = 21
    Anchors = [akLeft, akTop, akRight]
    TabOrder = 5
    OnChange = edCaptionChange
  end
  object chkVisible: TCheckBox
    Left = 8
    Top = 77
    Width = 125
    Height = 17
    Caption = '&Visible'
    TabOrder = 6
    OnClick = chkVisibleClick
  end
  object chkToggle: TCheckBox
    Left = 8
    Top = 41
    Width = 125
    Height = 17
    Caption = '&Toggle'
    TabOrder = 7
    OnClick = chkToggleClick
  end
  object chkShowImage: TCheckBox
    Left = 152
    Top = 114
    Width = 131
    Height = 17
    Caption = 'Show Special &Image'
    TabOrder = 8
    OnClick = chkShowImageClick
  end
  object chkShowHints: TCheckBox
    Left = 152
    Top = 95
    Width = 125
    Height = 17
    Caption = '&Show Hints'
    TabOrder = 9
    OnClick = chkShowHintsClick
  end
  object chkLogEvents: TCheckBox
    Left = 19
    Top = 444
    Width = 97
    Height = 17
    Anchors = [akLeft, akBottom]
    Caption = '&Log Events'
    TabOrder = 10
  end
  object chkEnabled: TCheckBox