lazarus-ccr/components/tdi/Demo/uform2.lfm

object Form2: TForm2
  Left = 555
  Height = 252
  Top = 328
  Width = 499
  Caption = 'Form2'
  ClientHeight = 252
  ClientWidth = 499
  KeyPreview = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDeactivate = FormDeactivate
  OnDestroy = FormDestroy
  OnHide = FormHide
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  LCLVersion = '1.1'
  object Edit1: TEdit
    Left = 48
    Height = 23
    Top = 72
    Width = 403
    Anchors = [akTop, akLeft, akRight]
    TabOrder = 0
    Text = 'Edit1'
  end
  object Edit2: TEdit
    Left = 48
    Height = 23
    Top = 128
    Width = 403
    Anchors = [akTop, akLeft, akRight]
    TabOrder = 2
    Text = 'Edit2'
  end
  object CheckBox1: TCheckBox
    Left = 48
    Height = 19
    Top = 98
    Width = 90
    Caption = 'Disable Edit 1'
    Checked = True
    OnChange = CheckBox1Change
    State = cbChecked
    TabOrder = 1
  end
  object bClose: TButton
    Left = 365
    Height = 25
    Top = 192
    Width = 86
    Anchors = [akRight, akBottom]
    AutoSize = True
    Caption = 'Close Form'
    OnClick = bCloseClick
    TabOrder = 5
  end
  object Label2: TLabel
    AnchorSideLeft.Control = Owner
    AnchorSideLeft.Side = asrCenter
    Left = 44
    Height = 30
    Top = 16
    Width = 410
    Alignment = taCenter
    Caption = 'This Form does NOT have Max Constraints. It will be Aligned by "alClient". '#13#10'Design forms like this using Anchors to expand controls all over the Page'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object Label1: TLabel
    AnchorSideLeft.Control = bClose
    AnchorSideLeft.Side = asrCenter
    AnchorSideTop.Control = bClose
    AnchorSideTop.Side = asrBottom
    Left = 350
    Height = 15
    Top = 223
    Width = 117
    BorderSpacing.Top = 6
    Caption = 'This Form is not Freed'
    ParentColor = False
  end
  object bToggle1: TButton
    Left = 48
    Height = 25
    Top = 192
    Width = 75
    Caption = 'Toggle 1'
    OnClick = bToggle1Click
    TabOrder = 3
  end
  object bToggle2: TButton
    Left = 144
    Height = 25
    Top = 192
    Width = 75
    Caption = 'Toggle 2'
    Enabled = False
    OnClick = bToggle1Click
    TabOrder = 4
  end
end