diff options
| -rwxr-xr-x | components/richtext/RichTextView.pas | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/components/richtext/RichTextView.pas b/components/richtext/RichTextView.pas index 7a37c49e..48b78c47 100755 --- a/components/richtext/RichTextView.pas +++ b/components/richtext/RichTextView.pas @@ -670,6 +670,9 @@ writeln('DEBUG: TRichTextView.HandlePaint >>>'); Exit; //==> end; + if Length(FText) = 0 then + exit; // no need to paint anything further. + Assert(FLayout <> nil, 'FLayout may not be nil at this point!'); Draw( 0, FLayout.FNumLines ); Canvas.ClearClipRect; |