object Form1: TForm1
  Left = 290
  Height = 300
  Top = 155
  Width = 400
  HorzScrollBar.Page = 399
  VertScrollBar.Page = 299
  Caption = 'QueueAsyncCall example'
  ClientHeight = 300
  ClientWidth = 400
  object Button1: TButton
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Owner
    Left = 4
    Height = 25
    Top = 4
    Width = 124
    BorderSpacing.Around = 4
    Caption = 'Direct call'
    OnClick = Button1Click
    TabOrder = 0
  end
  object Button2: TButton
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Button1
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = Button1
    AnchorSideRight.Side = asrBottom
    Left = 4
    Height = 25
    Top = 33
    Width = 124
    Anchors = [akTop, akLeft, akRight]
    BorderSpacing.Left = 4
    BorderSpacing.Top = 4
    Caption = 'Async call'
    OnClick = Button2Click
    TabOrder = 1
  end
  object Memo1: TMemo
    AnchorSideLeft.Control = Button1
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 132
    Height = 292
    Top = 4
    Width = 264
    Anchors = [akTop, akLeft, akRight, akBottom]
    BorderSpacing.Around = 4
    ReadOnly = True
    ScrollBars = ssAutoBoth
    TabOrder = 2
  end
  object RadioGroup1: TRadioGroup
    AnchorSideLeft.Control = Button2
    AnchorSideRight.Control = Button2
    AnchorSideRight.Side = asrBottom
    Left = 4
    Height = 72
    Top = 75
    Width = 124
    Anchors = [akTop, akLeft, akRight]
    AutoFill = True
    Caption = 'Parameters'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.TopBottomSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    ClientHeight = 54
    ClientWidth = 120
    ItemIndex = 0
    Items.Strings = (
      'Integer (simple)'
      'Record (advanced)'
    )
    TabOrder = 3
  end
end