diff --git a/components/rtfview/rtfview.pas b/components/rtfview/rtfview.pas index a494e5964..e6b5415e1 100644 --- a/components/rtfview/rtfview.pas +++ b/components/rtfview/rtfview.pas @@ -1117,7 +1117,7 @@ end; function TRTFView.GetCredits: string; begin - result := 'TRTFView based on TRichView v0.5.1 (www.TCustomRichView.com)' + result := 'TRTFView based on '+ inherited GetCredits; end; constructor TRTFView.Create(AOwner: TComponent); diff --git a/components/rtfview/rtfviewpkg.lpk b/components/rtfview/rtfviewpkg.lpk index f0cf0d6ab..6d9c57dc8 100644 --- a/components/rtfview/rtfviewpkg.lpk +++ b/components/rtfview/rtfviewpkg.lpk @@ -20,7 +20,7 @@ "/> - + @@ -32,7 +32,7 @@ - + diff --git a/components/rtfview/sample/project1.lpi b/components/rtfview/sample/project1.lpi index 5aadb6fb9..2b20ed9fe 100644 --- a/components/rtfview/sample/project1.lpi +++ b/components/rtfview/sample/project1.lpi @@ -45,7 +45,7 @@ - + @@ -53,10 +53,10 @@ - - + + - + diff --git a/components/rtfview/sample/unit1.lfm b/components/rtfview/sample/unit1.lfm index c5cf6997b..2533e5b98 100644 --- a/components/rtfview/sample/unit1.lfm +++ b/components/rtfview/sample/unit1.lfm @@ -1,10 +1,11 @@ object Form1: TForm1 - Left = 301 + Left = 279 Height = 401 Top = 102 - Width = 463 - HorzScrollBar.Page = 462 + Width = 485 + HorzScrollBar.Page = 484 VertScrollBar.Page = 400 + ActiveControl = Button2 Caption = 'Form1' object Button2: TButton Left = 10 @@ -21,7 +22,7 @@ object Form1: TForm1 Left = 10 Height = 336 Top = 10 - Width = 443 + Width = 465 AllowSelection = True Anchors = [akTop, akLeft, akRight, akBottom] DefaultBackColor = clWindow diff --git a/components/rtfview/sample/unit1.lrs b/components/rtfview/sample/unit1.lrs index a032c6bb1..abd6ba23f 100644 --- a/components/rtfview/sample/unit1.lrs +++ b/components/rtfview/sample/unit1.lrs @@ -1,14 +1,14 @@ { This is an automatically generated lazarus resource file } LazarusResources.Add('TForm1','FORMDATA',[ - 'TPF0'#6'TForm1'#5'Form1'#4'Left'#3'-'#1#6'Height'#3#145#1#3'Top'#2'f'#5'Widt' - +'h'#3#207#1#18'HorzScrollBar.Page'#3#206#1#18'VertScrollBar.Page'#3#144#1#7 - +'Caption'#6#5'Form1'#0#7'TButton'#7'Button2'#4'Left'#2#10#6'Height'#2#21#3'T' - +'op'#3'h'#1#5'Width'#2'K'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#25'BorderSpa' - +'cing.InnerBorder'#2#4#7'Caption'#6#8'Overview'#7'OnClick'#7#12'Button2Click' - +#8'TabOrder'#2#0#0#0#8'TRTFView'#4'View'#4'Left'#2#10#6'Height'#3'P'#1#3'Top' - +#2#10#5'Width'#3#187#1#14'AllowSelection'#9#7'Anchors'#11#5'akTop'#6'akLeft' - +#7'akRight'#8'akBottom'#0#16'DefaultBackColor'#7#8'clWindow'#10'LeftMargin'#2 - +#5#11'RightMargin'#2#5#8'TabOrder'#2#1#7'TabStop'#9#8'Tracking'#9#14'VScroll' - +'Visible'#9#0#0#0 + 'TPF0'#6'TForm1'#5'Form1'#4'Left'#3#23#1#6'Height'#3#145#1#3'Top'#2'f'#5'Widt' + +'h'#3#229#1#18'HorzScrollBar.Page'#3#228#1#18'VertScrollBar.Page'#3#144#1#13 + +'ActiveControl'#7#7'Button2'#7'Caption'#6#5'Form1'#0#7'TButton'#7'Button2'#4 + +'Left'#2#10#6'Height'#2#21#3'Top'#3'h'#1#5'Width'#2'K'#7'Anchors'#11#6'akLef' + +'t'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#8'Overview' + +#7'OnClick'#7#12'Button2Click'#8'TabOrder'#2#0#0#0#8'TRTFView'#4'View'#4'Lef' + +'t'#2#10#6'Height'#3'P'#1#3'Top'#2#10#5'Width'#3#209#1#14'AllowSelection'#9#7 + +'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#16'DefaultBackColor' + +#7#8'clWindow'#10'LeftMargin'#2#5#11'RightMargin'#2#5#8'TabOrder'#2#1#7'TabS' + +'top'#9#8'Tracking'#9#14'VScrollVisible'#9#0#0#0 ]);