You've already forked lazarus-ccr
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6727 8e941d3f-bd1b-0410-a28a-d453659cc2b4
57 lines
1.3 KiB
Plaintext
57 lines
1.3 KiB
Plaintext
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
|