mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-02 03:12:37 +02:00
102 lines
2.4 KiB
Plaintext
102 lines
2.4 KiB
Plaintext
object ReportShapeEditForm: TReportShapeEditForm
|
|
Left = 634
|
|
Height = 388
|
|
Top = 458
|
|
Width = 569
|
|
Caption = 'Edit report shape'
|
|
ClientHeight = 388
|
|
ClientWidth = 569
|
|
OnCloseQuery = FormCloseQuery
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
LCLVersion = '1.9.0.0'
|
|
object BPShape: TButtonPanel
|
|
Left = 6
|
|
Height = 42
|
|
Top = 340
|
|
Width = 557
|
|
OKButton.Name = 'OKButton'
|
|
OKButton.DefaultCaption = True
|
|
HelpButton.Name = 'HelpButton'
|
|
HelpButton.DefaultCaption = True
|
|
CloseButton.Name = 'CloseButton'
|
|
CloseButton.DefaultCaption = True
|
|
CancelButton.Name = 'CancelButton'
|
|
CancelButton.DefaultCaption = True
|
|
TabOrder = 0
|
|
ShowButtons = [pbOK, pbCancel]
|
|
end
|
|
object RGShape: TRadioGroup
|
|
Left = 8
|
|
Height = 144
|
|
Top = 0
|
|
Width = 240
|
|
AutoFill = True
|
|
Caption = 'Shape'
|
|
ChildSizing.LeftRightSpacing = 6
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 1
|
|
ClientHeight = 126
|
|
ClientWidth = 238
|
|
Items.Strings = (
|
|
'Ellipse'
|
|
'Circle'
|
|
'Line'
|
|
'Square'
|
|
'stTriangle'
|
|
)
|
|
OnClick = RGShapeClick
|
|
TabOrder = 1
|
|
end
|
|
object PBPreview: TPaintBox
|
|
Left = 248
|
|
Height = 267
|
|
Top = 56
|
|
Width = 304
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
OnPaint = PBPreviewPaint
|
|
end
|
|
object LPreview: TLabel
|
|
Left = 248
|
|
Height = 17
|
|
Top = 24
|
|
Width = 44
|
|
Caption = 'Preview'
|
|
ParentColor = False
|
|
end
|
|
object RGOrientation: TRadioGroup
|
|
Left = 8
|
|
Height = 153
|
|
Top = 160
|
|
Width = 240
|
|
AutoFill = True
|
|
Caption = 'Orientation'
|
|
ChildSizing.LeftRightSpacing = 6
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 2
|
|
ClientHeight = 135
|
|
ClientWidth = 238
|
|
Columns = 2
|
|
Items.Strings = (
|
|
'North'
|
|
'NorthEast'
|
|
'East'
|
|
'SouthEast'
|
|
'South'
|
|
'SouthWest'
|
|
'West'
|
|
'NorthWest'
|
|
)
|
|
OnClick = RGShapeClick
|
|
TabOrder = 2
|
|
end
|
|
end
|