diff options
| author | Graeme Geldenhuys <graemeg@gmail.com> | 2013-05-13 12:08:24 +0100 |
|---|---|---|
| committer | Graeme Geldenhuys <graemeg@gmail.com> | 2013-05-13 12:08:24 +0100 |
| commit | 5fce370be96f9ff24a908f301092429bb88b4f76 (patch) | |
| tree | 04866e572f1109ffcc19e2c9ae2c50dbdf861f59 | |
| parent | ac0006ebe18c72ec077820717bc29fd0e2ff0170 (diff) | |
| download | fpGUI-5fce370be96f9ff24a908f301092429bb88b4f76.tar.xz | |
docview: replace some code with convenience function to make it more readable
| -rw-r--r-- | docview/components/richtext/RichTextView.pas | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/docview/components/richtext/RichTextView.pas b/docview/components/richtext/RichTextView.pas index fe38017f..4da2cfac 100644 --- a/docview/components/richtext/RichTextView.pas +++ b/docview/components/richtext/RichTextView.pas @@ -1007,7 +1007,7 @@ begin if InDesigner then exit; - if WinHandle = 0 then + if IsLoading then exit; RemoveCursor; @@ -1066,8 +1066,10 @@ ProfileEvent('DEBUG: TRichTextView.Layout >>>>'); if InDesigner then exit; - if WinHandle = 0 then + + if IsLoading then exit; + ProfileEvent('DEBUG: TRichTextView.Layout 1 of 6'); FSelectionEnd := -1; FSelectionStart := -1; |