diff options
Diffstat (limited to 'src/gui/fpg_tab.pas')
| -rw-r--r-- | src/gui/fpg_tab.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/gui/fpg_tab.pas b/src/gui/fpg_tab.pas index 36319fe6..9df121f4 100644 --- a/src/gui/fpg_tab.pas +++ b/src/gui/fpg_tab.pas @@ -395,7 +395,7 @@ begin inc(i); end; if FFont.TextWidth(s1) > (FFixedTabWidth-10) then - Delete(s1, length(s1), 1); {$Note This must become a UTF8 function} + UTF8Delete(s1, UTF8Length(s1), 1); if Length(s1) > 0 then s1 := Trim(s1); Result := s1; |