object Form1: TForm1 Left = 523 Height = 240 Top = 246 Width = 320 Caption = 'RxMessageBeep demo' ClientHeight = 240 ClientWidth = 320 LCLVersion = '1.9.0.0' object RadioGroup1: TRadioGroup AnchorSideLeft.Control = Owner AnchorSideTop.Control = Owner Left = 6 Height = 137 Top = 6 Width = 133 AutoFill = True AutoSize = True BorderSpacing.Around = 6 Caption = 'Beep style' ChildSizing.LeftRightSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 1 ClientHeight = 119 ClientWidth = 129 ItemIndex = 0 Items.Strings = ( 'mbsBeep' 'mbsIconAsterisk' 'mbsIconExclamation' 'mbsIconError' 'mbsIconQuestion' 'mbsIconWarning' 'mbsOk' ) TabOrder = 0 end object Button1: TButton AnchorSideLeft.Control = RadioGroup1 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = RadioGroup1 AnchorSideTop.Side = asrCenter Left = 145 Height = 23 Top = 63 Width = 95 AutoSize = True Caption = 'Message beep' OnClick = Button1Click TabOrder = 1 end end