pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

richmemo: layout anchros for paragraph test

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3794 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
skalogryz
2014-11-27 06:14:54 +00:00
parent 6c9f217f74
commit 6374f6a014
1 changed files with 28 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

45
components/richmemo/samples/paragraphs/mainform.lfm
View File

@ -1,13 +1,13 @@
object Form1: TForm1
Left = 362
Left = 219
Height = 338
Top = 203
Top = 189
Width = 615
Caption = 'Paragraph Demo'
ClientHeight = 338
ClientWidth = 615
OnShow = FormShow
LCLVersion = '1.3'
LCLVersion = '1.0.10.0'
object Button1: TButton
Left = 532
Height = 25
@ -76,6 +76,7 @@ object Form1: TForm1
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
}
GroupIndex = 1
NumGlyphs = 0
OnClick = btnLAClick
ParentBidiMode = False
end
@ -113,6 +114,7 @@ object Form1: TForm1
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
}
GroupIndex = 1
NumGlyphs = 0
OnClick = btnCAClick
end
object btnRA: TSpeedButton
@ -149,6 +151,7 @@ object Form1: TForm1
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
}
GroupIndex = 1
NumGlyphs = 0
OnClick = btnRAClick
end
object btnJA: TSpeedButton
@ -185,20 +188,25 @@ object Form1: TForm1
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
}
GroupIndex = 1
NumGlyphs = 0
OnClick = btnJAClick
end
object edtFL: TSpinEdit
Left = 72
Height = 21
AnchorSideLeft.Control = Label1
AnchorSideLeft.Side = asrBottom
Left = 76
Height = 27
Top = 48
Width = 88
BorderSpacing.Left = 5
MaxValue = 1000
OnChange = edtFLChange
TabOrder = 3
end
object edtHI: TSpinEdit
Left = 72
Height = 21
AnchorSideLeft.Control = edtFL
Left = 76
Height = 27
Top = 72
Width = 88
MaxValue = 1000
@ -206,35 +214,38 @@ object Form1: TForm1
TabOrder = 4
end
object edtTI: TSpinEdit
Left = 240
Height = 21
AnchorSideLeft.Control = Label3
AnchorSideLeft.Side = asrBottom
Left = 251
Height = 27
Top = 48
Width = 88
BorderSpacing.Left = 5
MaxValue = 1000
OnChange = edtTIChange
TabOrder = 5
end
object Label1: TLabel
Left = 8
Height = 13
Height = 18
Top = 48
Width = 43
Width = 63
Caption = 'First Line'
ParentColor = False
end
object Label2: TLabel
Left = 8
Height = 13
Height = 18
Top = 72
Width = 32
Width = 44
Caption = 'Indent'
ParentColor = False
end
object Label3: TLabel
Left = 176
Height = 13
Height = 18
Top = 48
Width = 51
Width = 70
Caption = 'Tail Indent'
ParentColor = False
end
@ -245,8 +256,8 @@ object Form1: TForm1
object ImageList1: TImageList
Height = 24
Width = 24
left = 352
top = 29
left = 424
top = 24
Bitmap = {
4C69040000001800000018000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF