diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-09-01 10:31:07 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-09-01 10:31:07 +0200 |
| commit | b24f69f7b18bd72e0787a634d5893d5f2dd2f736 (patch) | |
| tree | 754ee894bc6b490ab9404c801e5ce0cff2f368d7 /docview/components/richtext | |
| parent | e068b9b8d3d85d39ba0ab7bc81d5bae6db74b300 (diff) | |
| download | fpGUI-b24f69f7b18bd72e0787a634d5893d5f2dd2f736.tar.xz | |
docview: Replace unicode character in source code with UTF-8 byte sequence.
Diffstat (limited to 'docview/components/richtext')
| -rw-r--r-- | docview/components/richtext/RichTextView.pas | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/docview/components/richtext/RichTextView.pas b/docview/components/richtext/RichTextView.pas index 49ea97c4..116b72b5 100644 --- a/docview/components/richtext/RichTextView.pas +++ b/docview/components/richtext/RichTextView.pas @@ -395,9 +395,6 @@ Type //Property OnSetupShow; //Property OnScan; - Protected - //Property Font; - End; @@ -1629,7 +1626,7 @@ begin s := Text; // Warning: Hack Alert! replace some strange Bell character found in some INF files // s := SubstituteChar(s, Chr($07), Chr($20) ); - s := StringReplace(s, Chr($07), '•', [rfReplaceAll, rfIgnoreCase]); + s := StringReplace(s, Chr($07), #$E2#$80#$A2, [rfReplaceAll, rfIgnoreCase]); // u+2022 small bullet //// Hack Alert #2: replace strange table chars with something we can actually see // s := SubstituteChar(s, Chr(218), Char('+') ); // top-left corner |