TRichView.com

Thank you very much!!

just one more question:

I use this command to insert variables:
SRichViewEdit1.RichViewEdit.CurTextStyleNo: = 6;
SRichViewEdit1.RichViewEdit.InsertText ('{name} ', False);
SRichViewEdit1.RichViewEdit.SetFocus;

6 The style is to be locked in variable text and will not change.
but when the text is changed, ie, the variable receives its value, the text remains locked. I tried using RVStyle1.ResetTextStyles, but stayed with letters, fonts, colors, very different. The same way I have the style 6, would like to format all text to the style of 0, which would normal text. how to do this?

You can call this procedure to remove all protection:

Very Nice!!

Thank you Sergey

The code you gave me using:

FillFields (SRichViewEdit1.RichViewEdit.RVData, SRichViewEdit1, 1);
SRichViewEdit1.Format;

worked just fine. but it does not alter the header or the footer. I used then:

FillFields (SRichViewEdit1.RVFooter.RVData, SRichViewEdit1, 1);
SRichViewEdit1.Format;

and

FillFields (SRichViewEdit1.RVHeader.RVData, SRichViewEdit1, 1);
SRichViewEdit1.Format;

but the error: List index out of bouds (61).
this line: "if RVData.GetItemStyle (i) = rvsTable then begin"

There are how to resolve this so they can change the variables of the header and footer?

For RVHeader and RVFooter, use your old version of FillFields.

ok, I can use FillFields old. But it would have somehow to get the headers of the pages to be independent? as if a page had a headline and I could change the header on page 2 without changing the first. as if making a break header?

Unfortunately, the current version of TSRichViewEdit does not support different headers/footers for different pages.

ok Sergey, thank you