2009-06-06 13:36:57 +00:00
|
|
|
object Form1: TForm1
|
2009-06-14 17:33:35 +00:00
|
|
|
Left = 196
|
|
|
|
Height = 457
|
|
|
|
Top = 181
|
|
|
|
Width = 634
|
|
|
|
ActiveControl = RichMemo1
|
2009-06-06 13:36:57 +00:00
|
|
|
Caption = 'Form1'
|
2009-06-14 17:33:35 +00:00
|
|
|
ClientHeight = 457
|
|
|
|
ClientWidth = 634
|
2009-06-12 20:46:34 +00:00
|
|
|
OnCreate = FormCreate
|
2009-06-06 13:36:57 +00:00
|
|
|
LCLVersion = '0.9.27'
|
|
|
|
object RichMemo1: TRichMemo
|
2009-06-17 06:07:10 +00:00
|
|
|
Left = 15
|
|
|
|
Height = 358
|
2009-06-15 20:40:16 +00:00
|
|
|
Top = 16
|
2009-06-14 17:33:35 +00:00
|
|
|
Width = 619
|
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-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
|
|
|
|
end
|
|
|
|
object Button1: TButton
|
|
|
|
Left = 24
|
|
|
|
Height = 25
|
2009-06-14 17:33:35 +00:00
|
|
|
Top = 382
|
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
|
2009-06-14 17:33:35 +00:00
|
|
|
Top = 382
|
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
|
2009-06-14 17:33:35 +00:00
|
|
|
Top = 382
|
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
|
2009-06-14 17:33:35 +00:00
|
|
|
Top = 382
|
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
|
2009-06-14 17:33:35 +00:00
|
|
|
Top = 382
|
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
|
|
|
|
Left = 24
|
2009-06-10 10:32:44 +00:00
|
|
|
Height = 25
|
2009-06-14 17:33:35 +00:00
|
|
|
Top = 415
|
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
|
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
|
2009-06-17 06:07:10 +00:00
|
|
|
top = 429
|
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
|
2009-06-17 06:07:10 +00:00
|
|
|
top = 429
|
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
|
2009-06-17 06:07:10 +00:00
|
|
|
top = 429
|
2009-06-06 13:36:57 +00:00
|
|
|
end
|
|
|
|
end
|