2009-06-06 13:36:57 +00:00
|
|
|
object Form1: TForm1
|
2014-11-13 23:35:45 +00:00
|
|
|
Left = 281
|
2014-11-16 06:46:18 +00:00
|
|
|
Height = 483
|
2014-11-13 23:35:45 +00:00
|
|
|
Top = 198
|
2009-06-14 17:33:35 +00:00
|
|
|
Width = 634
|
|
|
|
ActiveControl = RichMemo1
|
2009-06-06 13:36:57 +00:00
|
|
|
Caption = 'Form1'
|
2014-11-16 06:46:18 +00:00
|
|
|
ClientHeight = 483
|
2009-06-14 17:33:35 +00:00
|
|
|
ClientWidth = 634
|
2009-06-12 20:46:34 +00:00
|
|
|
OnCreate = FormCreate
|
2014-12-23 14:14:10 +00:00
|
|
|
LCLVersion = '1.3'
|
2009-06-06 13:36:57 +00:00
|
|
|
object RichMemo1: TRichMemo
|
2009-06-17 06:07:10 +00:00
|
|
|
Left = 15
|
2014-12-23 14:14:10 +00:00
|
|
|
Height = 288
|
|
|
|
Top = 72
|
2014-11-13 23:35:45 +00:00
|
|
|
Width = 609
|
2009-06-06 13:36:57 +00:00
|
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
2009-06-14 17:33:35 +00:00
|
|
|
Font.Height = -13
|
|
|
|
Font.Name = 'Tahoma'
|
2009-06-06 13:36:57 +00:00
|
|
|
HideSelection = False
|
|
|
|
Lines.Strings = (
|
|
|
|
'RichMemo1'
|
|
|
|
)
|
2009-09-19 18:11:58 +00:00
|
|
|
OnChange = RichMemo1Change
|
2014-11-13 23:35:45 +00:00
|
|
|
OnKeyUp = RichMemo1KeyUp
|
|
|
|
OnMouseUp = RichMemo1MouseUp
|
2009-06-14 17:33:35 +00:00
|
|
|
ParentFont = False
|
2009-06-15 20:40:16 +00:00
|
|
|
ScrollBars = ssVertical
|
2009-06-06 13:36:57 +00:00
|
|
|
TabOrder = 0
|
2014-12-23 14:14:10 +00:00
|
|
|
ZoomFactor = 1
|
2009-06-06 13:36:57 +00:00
|
|
|
end
|
|
|
|
object Button1: TButton
|
2014-11-16 06:46:18 +00:00
|
|
|
Left = 16
|
2009-06-06 13:36:57 +00:00
|
|
|
Height = 25
|
2014-11-16 06:46:18 +00:00
|
|
|
Top = 368
|
2009-06-12 20:46:34 +00:00
|
|
|
Width = 160
|
2009-06-06 13:36:57 +00:00
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
Caption = 'Make Bold and Red'
|
|
|
|
OnClick = Button1Click
|
|
|
|
TabOrder = 1
|
2009-06-17 06:07:10 +00:00
|
|
|
TabStop = False
|
2009-06-06 13:36:57 +00:00
|
|
|
end
|
|
|
|
object Button2: TButton
|
2009-06-12 20:46:34 +00:00
|
|
|
Left = 192
|
2009-06-06 13:36:57 +00:00
|
|
|
Height = 25
|
2014-11-16 06:46:18 +00:00
|
|
|
Top = 368
|
2009-06-12 20:46:34 +00:00
|
|
|
Width = 97
|
2009-06-06 13:36:57 +00:00
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
Caption = 'Get Attribs'
|
|
|
|
OnClick = Button2Click
|
|
|
|
TabOrder = 2
|
2009-06-17 06:07:10 +00:00
|
|
|
TabStop = False
|
2009-06-06 13:36:57 +00:00
|
|
|
end
|
|
|
|
object Button3: TButton
|
2009-06-12 20:46:34 +00:00
|
|
|
Left = 304
|
2009-06-06 13:36:57 +00:00
|
|
|
Height = 25
|
2014-11-16 06:46:18 +00:00
|
|
|
Top = 368
|
2009-06-12 20:46:34 +00:00
|
|
|
Width = 96
|
2009-06-06 13:36:57 +00:00
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
Caption = 'Select Font'
|
|
|
|
OnClick = Button3Click
|
|
|
|
TabOrder = 3
|
2009-06-17 06:07:10 +00:00
|
|
|
TabStop = False
|
2009-06-06 13:36:57 +00:00
|
|
|
end
|
2009-06-10 10:32:44 +00:00
|
|
|
object Button4: TButton
|
2009-06-14 17:33:35 +00:00
|
|
|
Left = 528
|
2009-06-10 10:32:44 +00:00
|
|
|
Height = 25
|
2014-11-16 06:46:18 +00:00
|
|
|
Top = 368
|
2009-06-10 10:32:44 +00:00
|
|
|
Width = 75
|
2009-06-14 17:33:35 +00:00
|
|
|
Anchors = [akLeft, akBottom]
|
2009-06-15 20:40:16 +00:00
|
|
|
Caption = 'Save RTF'
|
2009-06-10 10:32:44 +00:00
|
|
|
OnClick = Button4Click
|
|
|
|
TabOrder = 4
|
2009-06-17 06:07:10 +00:00
|
|
|
TabStop = False
|
2009-06-10 10:32:44 +00:00
|
|
|
end
|
2009-06-12 20:46:34 +00:00
|
|
|
object Button5: TButton
|
2009-06-14 17:33:35 +00:00
|
|
|
Left = 440
|
2009-06-12 20:46:34 +00:00
|
|
|
Height = 25
|
2014-11-16 06:46:18 +00:00
|
|
|
Top = 368
|
2009-06-12 20:46:34 +00:00
|
|
|
Width = 75
|
2009-06-14 17:33:35 +00:00
|
|
|
Anchors = [akLeft, akBottom]
|
2009-06-15 20:40:16 +00:00
|
|
|
Caption = 'Load RTF'
|
2009-06-12 20:46:34 +00:00
|
|
|
OnClick = Button5Click
|
2009-06-10 10:32:44 +00:00
|
|
|
TabOrder = 5
|
2009-06-17 06:07:10 +00:00
|
|
|
TabStop = False
|
2009-06-10 10:32:44 +00:00
|
|
|
end
|
2009-06-12 20:46:34 +00:00
|
|
|
object Button6: TButton
|
2014-11-16 06:46:18 +00:00
|
|
|
Left = 16
|
2009-06-10 10:32:44 +00:00
|
|
|
Height = 25
|
2014-11-16 06:46:18 +00:00
|
|
|
Top = 400
|
2009-06-12 20:46:34 +00:00
|
|
|
Width = 160
|
2009-06-14 17:33:35 +00:00
|
|
|
Anchors = [akLeft, akBottom]
|
2009-06-12 20:46:34 +00:00
|
|
|
Caption = 'Next Style Range'
|
|
|
|
OnClick = Button6Click
|
2009-06-10 10:32:44 +00:00
|
|
|
TabOrder = 6
|
2009-06-17 06:07:10 +00:00
|
|
|
TabStop = False
|
2009-06-10 10:32:44 +00:00
|
|
|
end
|
2014-11-13 23:35:45 +00:00
|
|
|
object Button7: TButton
|
|
|
|
Left = 15
|
|
|
|
Height = 25
|
|
|
|
Top = 16
|
|
|
|
Width = 51
|
|
|
|
Caption = 'Left'
|
|
|
|
OnClick = Button7Click
|
|
|
|
TabOrder = 7
|
|
|
|
end
|
|
|
|
object Button8: TButton
|
|
|
|
Left = 72
|
|
|
|
Height = 25
|
|
|
|
Top = 16
|
|
|
|
Width = 53
|
|
|
|
Caption = 'Center'
|
|
|
|
OnClick = Button8Click
|
|
|
|
TabOrder = 8
|
|
|
|
end
|
|
|
|
object Button9: TButton
|
|
|
|
Left = 131
|
|
|
|
Height = 25
|
|
|
|
Top = 16
|
|
|
|
Width = 53
|
|
|
|
Caption = 'Right'
|
|
|
|
OnClick = Button9Click
|
|
|
|
TabOrder = 9
|
|
|
|
end
|
|
|
|
object Button10: TButton
|
|
|
|
Left = 192
|
|
|
|
Height = 25
|
|
|
|
Top = 16
|
|
|
|
Width = 53
|
|
|
|
Caption = 'Justify'
|
|
|
|
OnClick = Button10Click
|
|
|
|
TabOrder = 10
|
|
|
|
end
|
|
|
|
object StartIdent: TFloatSpinEdit
|
|
|
|
Left = 344
|
2014-12-23 14:14:10 +00:00
|
|
|
Height = 21
|
2014-11-13 23:35:45 +00:00
|
|
|
Top = 18
|
|
|
|
Width = 78
|
|
|
|
Increment = 1
|
|
|
|
MaxValue = 100
|
2014-11-15 18:57:15 +00:00
|
|
|
MinValue = -100
|
2014-11-13 23:35:45 +00:00
|
|
|
OnChange = StartIdentChange
|
|
|
|
TabOrder = 11
|
|
|
|
Value = 0
|
|
|
|
end
|
|
|
|
object Label1: TLabel
|
|
|
|
Left = 304
|
2014-12-23 14:14:10 +00:00
|
|
|
Height = 13
|
2014-11-13 23:35:45 +00:00
|
|
|
Top = 18
|
|
|
|
Width = 27
|
|
|
|
Caption = 'Start '
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object Label2: TLabel
|
|
|
|
Left = 304
|
2014-12-23 14:14:10 +00:00
|
|
|
Height = 13
|
2014-11-13 23:35:45 +00:00
|
|
|
Top = 48
|
2014-12-23 14:14:10 +00:00
|
|
|
Width = 31
|
2014-11-13 23:35:45 +00:00
|
|
|
Caption = 'Offset'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object OffsetIdent: TFloatSpinEdit
|
|
|
|
Left = 344
|
2014-12-23 14:14:10 +00:00
|
|
|
Height = 21
|
2014-11-13 23:35:45 +00:00
|
|
|
Top = 46
|
|
|
|
Width = 78
|
|
|
|
Increment = 1
|
|
|
|
MaxValue = 100
|
2014-11-15 18:57:15 +00:00
|
|
|
MinValue = -100
|
2014-11-13 23:35:45 +00:00
|
|
|
OnChange = StartIdentChange
|
|
|
|
TabOrder = 12
|
|
|
|
Value = 0
|
|
|
|
end
|
2014-11-16 06:46:18 +00:00
|
|
|
object Label3: TLabel
|
|
|
|
Left = 16
|
2014-12-23 14:14:10 +00:00
|
|
|
Height = 13
|
2014-11-16 06:46:18 +00:00
|
|
|
Top = 434
|
2014-12-23 14:14:10 +00:00
|
|
|
Width = 31
|
2014-11-16 06:46:18 +00:00
|
|
|
Caption = 'Label3'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
2009-06-06 13:36:57 +00:00
|
|
|
object FontDialog1: TFontDialog
|
|
|
|
MinFontSize = 0
|
|
|
|
MaxFontSize = 0
|
2009-06-14 17:33:35 +00:00
|
|
|
left = 352
|
2014-11-16 06:46:18 +00:00
|
|
|
top = 389
|
2009-06-12 20:46:34 +00:00
|
|
|
end
|
|
|
|
object SaveDialog1: TSaveDialog
|
|
|
|
DefaultExt = '.rtf'
|
|
|
|
Filter = 'RichText file (*.rtf)|*.rtf'
|
|
|
|
Options = [ofOverwritePrompt, ofEnableSizing, ofViewDetail]
|
2009-06-14 17:33:35 +00:00
|
|
|
left = 280
|
2014-11-16 06:46:18 +00:00
|
|
|
top = 389
|
2009-06-12 20:46:34 +00:00
|
|
|
end
|
|
|
|
object OpenDialog1: TOpenDialog
|
|
|
|
DefaultExt = '.rtf'
|
|
|
|
Filter = 'RichText file (*.rtf)|*.rtf'
|
2009-06-14 17:33:35 +00:00
|
|
|
left = 208
|
2014-11-16 06:46:18 +00:00
|
|
|
top = 389
|
2009-06-06 13:36:57 +00:00
|
|
|
end
|
|
|
|
end
|