diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-02-11 15:34:06 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-02-11 15:34:06 +0200 |
| commit | 9073d5bd15c9e706b7c2e22468d84cb5a33db849 (patch) | |
| tree | 3c97a0f45098fa402d4f87589c808d5ec8c1faa2 /docview/components/richtext | |
| parent | 02c6d3f482327931d6b1644bcd15798b8eb96434 (diff) | |
| download | fpGUI-9073d5bd15c9e706b7c2e22468d84cb5a33db849.tar.xz | |
Fix compiler waring about unreachable code.
Diffstat (limited to 'docview/components/richtext')
| -rw-r--r-- | docview/components/richtext/RichTextView.pas | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/docview/components/richtext/RichTextView.pas b/docview/components/richtext/RichTextView.pas index 390ac376..5272eee3 100644 --- a/docview/components/richtext/RichTextView.pas +++ b/docview/components/richtext/RichTextView.pas @@ -1666,9 +1666,6 @@ Procedure TRichTextView.InsertText( CharIndexToInsertAt: longword; var NewText: PChar; begin - if CharIndexToInsertAt < 0 then - exit; - NewText := StrAlloc( StrLen( FText ) + StrLen( TextToInsert ) + 1 ); StrLCopy( NewText, FText, CharIndexToInsertAt ); StrCat( NewText, TextToInsert ); |