lazarus-ccr/components/rx/trunk/demos/RxPopupNotifier/unit1.lfm

object Form1: TForm1
  Left = 688
  Height = 381
  Top = 449
  Width = 577
  Caption = 'RxPopupNotifier demo'
  ClientHeight = 381
  ClientWidth = 577
  LCLVersion = '1.9.0.0'
  object Button4: TButton
    AnchorSideLeft.Control = Owner
    AnchorSideLeft.Side = asrCenter
    AnchorSideTop.Control = Button1
    AnchorSideTop.Side = asrBottom
    Left = 235
    Height = 23
    Top = 35
    Width = 106
    AutoSize = True
    BorderSpacing.Top = 6
    Caption = 'Static message'
    OnClick = Button4Click
    TabOrder = 0
  end
  object Button5: TButton
    AnchorSideLeft.Control = Owner
    AnchorSideLeft.Side = asrCenter
    AnchorSideTop.Control = Button4
    AnchorSideTop.Side = asrBottom
    Left = 229
    Height = 23
    Top = 64
    Width = 118
    AutoSize = True
    BorderSpacing.Top = 6
    Caption = 'Dinamic message'
    OnClick = Button5Click
    TabOrder = 1
  end
  object Button6: TButton
    AnchorSideLeft.Control = Owner
    AnchorSideLeft.Side = asrCenter
    AnchorSideTop.Control = ColorBox1
    AnchorSideTop.Side = asrBottom
    Left = 203
    Height = 23
    Top = 113
    Width = 171
    AutoSize = True
    BorderSpacing.Top = 6
    Caption = 'Message without auto close'
    OnClick = Button6Click
    TabOrder = 2
  end
  object Label1: TLabel
    AnchorSideTop.Control = Button4
    AnchorSideTop.Side = asrBottom
    Left = 416
    Height = 13
    Top = 64
    Width = 120
    BorderSpacing.Around = 6
    Caption = 'Dinamic message color'
    ParentColor = False
  end
  object ColorBox1: TColorBox
    AnchorSideLeft.Control = Label1
    AnchorSideTop.Control = Label1
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    Left = 422
    Height = 24
    Top = 83
    Width = 149
    Selected = clYellow
    Anchors = [akTop, akLeft, akRight]
    BorderSpacing.Around = 6
    ItemHeight = 20
    TabOrder = 3
  end
  object RadioGroup1: TRadioGroup
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Owner
    Left = 6
    Height = 86
    Top = 6
    Width = 116
    AutoFill = True
    AutoSize = True
    BorderSpacing.Around = 6
    Caption = 'Message positon'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    ClientHeight = 68
    ClientWidth = 112
    ItemIndex = 3
    Items.Strings = (
      'rpcTopLeft'
      'rpcTopRight'
      'rpcBootomLeft'
      'rpcBottomRight'
    )
    OnClick = RadioGroup1Click
    TabOrder = 4
  end
  object Button1: TButton
    AnchorSideLeft.Control = Owner
    AnchorSideLeft.Side = asrCenter
    AnchorSideTop.Control = Owner
    Left = 232
    Height = 23
    Top = 6
    Width = 112
    AutoSize = True
    BorderSpacing.Top = 6
    Caption = 'Design message'
    OnClick = Button1Click
    TabOrder = 5
  end
  object TrackBar1: TTrackBar
    Left = 35
    Height = 52
    Top = 265
    Width = 485
    Max = 250
    Position = 250
    TabOrder = 6
  end
  object CheckBox1: TCheckBox
    Left = 415
    Height = 17
    Top = 53
    Width = 107
    Caption = 'Show close timer'
    Checked = True
    State = cbChecked
    TabOrder = 7
  end
  object BitBtn1: TBitBtn
    Left = 150
    Height = 26
    Top = 325
    Width = 60
    AutoSize = True
    Default = True
    DefaultCaption = True
    Kind = bkOK
    ModalResult = 1
    TabOrder = 8
  end
  object RxPopupNotifier1: TRxPopupNotifier
    Items = <    
      item
        Active = False
        Color = clAqua
        AutoClose = False
        Caption = 'Design message'
        Message = 'Design time message'
        CloseButton.Hint = 'Close message'
        CloseButton.Flat = True
      end>
    OnNotifiClick = RxPopupNotifier1NotifiClick
    Left = 176
    Top = 16
  end
end