Loading of RTF causes an exception

[vit]

Hi!

I try loading RTF into TSRichViewEdit. And I receive an exception in TSRichViewEdit.HookAfterReadNote:

Code: Select all

---------------------------
Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EListError with message 'List index out of bounds (16)'. Process stopped. Use Step or Run to continue.
---------------------------
OK   Help   
---------------------------

Here is RTF that I want to load: http://webfile.ru/5268979

And here is a code that load RTF:

Code: Select all

procedure TForm1.Button1Click(Sender: TObject);
begin
  SRVE.RichViewEdit.LoadRTF('d:\test.rtf');
end;

This exception doesn't appear when I load RTF into TRichViewEdit.

Is this mistake in TSRichViewEdit or my RTF is corrupted?

Thank you!

[vit]

P.S. You can repeat this using ActionTest

[Sergey Tkachenko]

This is a bug (in TRichView code, but it appears only in ScaleRichView).
We will upload an update for registered users soon, may be today.