1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142
|
object Form1: TForm1
Left = 362
Height = 367
Top = 172
Width = 676
Align = alBottom
Caption = 'Test LazFreeType'
ClientHeight = 367
ClientWidth = 676
KeyPreview = True
OnCreate = FormCreate
OnDestroy = FormDestroy
OnMouseMove = FormMouseMove
OnPaint = FormPaint
OnShow = FormShow
Position = poDefault
LCLVersion = '2.3.0.0'
object Panel_Option: TPanel
Left = 0
Height = 56
Top = 311
Width = 676
Align = alBottom
ClientHeight = 56
ClientWidth = 676
ParentColor = False
TabOrder = 0
object TrackBar_Size: TTrackBar
AnchorSideLeft.Control = SpinEdit_Zoom
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Panel_Option
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = LFontSize
Left = 100
Height = 46
Top = 5
Width = 292
Frequency = 0
Max = 300
Min = 1
OnChange = TrackBar_SizeChange
Position = 30
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 4
BorderSpacing.Right = 4
TabOrder = 0
end
object LFontSize: TLabel
AnchorSideTop.Control = Panel_Option
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = LAngle
Left = 396
Height = 16
Top = 20
Width = 51
Alignment = taCenter
Anchors = [akTop, akRight]
AutoSize = False
BorderSpacing.Right = 4
Caption = 'LFontSize'
end
object Label1: TLabel
AnchorSideTop.Control = Panel_Option
AnchorSideTop.Side = asrCenter
Left = 6
Height = 17
Top = 20
Width = 39
Caption = 'Zoom'
end
object SpinEdit_Zoom: TSpinEdit
AnchorSideTop.Control = Panel_Option
AnchorSideTop.Side = asrCenter
Left = 48
Height = 26
Top = 15
Width = 48
MaxValue = 9
MinValue = 1
OnChange = SpinEdit_ZoomChange
TabOrder = 1
Value = 1
end
object LAngle: TLabel
AnchorSideTop.Control = Panel_Option
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = CheckBox_SingleLine
Left = 451
Height = 17
Top = 20
Width = 15
Anchors = [akTop, akRight]
BorderSpacing.Right = 4
Caption = '0ยบ'
end
object CheckBox_SingleLine: TRadioButton
AnchorSideTop.Control = Panel_Option
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = CheckBox_Para
Left = 470
Height = 24
Top = 16
Width = 65
Anchors = [akTop, akRight]
BorderSpacing.Right = 4
Caption = '1 Line'
OnChange = CheckBox_SingleLineChange
TabOrder = 2
end
object CheckBox_Rot: TRadioButton
AnchorSideTop.Control = Panel_Option
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = Panel_Option
AnchorSideRight.Side = asrBottom
Left = 599
Height = 24
Top = 16
Width = 72
Anchors = [akTop, akRight]
BorderSpacing.Right = 4
Caption = 'Rotate'
OnChange = CheckBox_SingleLineChange
TabOrder = 3
end
object CheckBox_Para: TRadioButton
AnchorSideTop.Control = Panel_Option
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = CheckBox_Rot
Left = 539
Height = 24
Top = 16
Width = 56
Anchors = [akTop, akRight]
BorderSpacing.Right = 4
Caption = 'Rect'
Checked = True
OnChange = CheckBox_SingleLineChange
TabOrder = 4
TabStop = True
end
end
end
|