numbering font

[cychia]

1. if i were to use rvaction for numbering, is there any property for me to allow the rvaction to follow current font when inserting a numbering? I can't find one.

2. so i tried to handle the numbering myself and below are the codes:

for nCounter := 0 to 8 do
begin
with ListLevels.Add do
begin
Font.Assign(FontInfo);
FirstIndent := 0;
LeftIndent := CS_ND_PARA_LEFT_INDENT_VALUE + nCounter * CS_ND_PARA_LEFT_INDENT_VALUE;
MarkerIndent := nCounter * CS_ND_PARA_LEFT_INDENT_VALUE;
ListType := rvlstDecimal;
FormatString := Format('%%%d:s.',[nCounter]);
end;
end;

I have tried to assign the font of the list style to current font, but only font name is following the one i have assigned, size not, any idea?

[Sergey Tkachenko]

1. Sorry, no

2. It must assign font name, size, color, style and charset (TCustomRVFontInfo.AssignTo is called).
If it does not, please create a simple project reproducing the problem and send it to me.