lazarus/examples/affinetransforms/unit1.lfm

71 lines
1.5 KiB
Plaintext

object Form1: TForm1
Left = 57
Height = 385
Top = 327
Width = 682
Caption = 'Form1'
ClientHeight = 385
ClientWidth = 682
OnCreate = FormCreate
OnDestroy = FormDestroy
Position = poScreenCenter
LCLVersion = '2.2.0.4'
object RG: TRadioGroup
Left = 504
Height = 248
Top = 16
Width = 169
Anchors = [akTop, akRight]
AutoFill = True
Caption = 'Mapping mode'
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 = 225
ClientWidth = 165
ItemIndex = 0
Items.Strings = (
'ANISOTROPIC'
'ISOTROPIC'
'LOENGLISH'
'HIENGLISH'
'LOMETRIC'
'HIMETRIC'
'TWIPS'
'ANISOTROPIC mirr.'
)
OnClick = RGClick
TabOrder = 0
end
object Label1: TLabel
Left = 498
Height = 21
Top = 288
Width = 146
Anchors = [akTop, akRight]
Caption = 'Resize the window'
end
object Label2: TLabel
Left = 499
Height = 21
Top = 307
Width = 143
Anchors = [akTop, akRight]
Caption = 'to see differences'
end
object PB: TPaintBox
Left = 0
Height = 385
Top = 0
Width = 488
Align = alLeft
Anchors = [akTop, akLeft, akRight, akBottom]
OnPaint = PBPaint
end
end