aboutsummaryrefslogtreecommitdiffstats
path: root/src/base
diff options
context:
space:
mode:
Diffstat (limited to 'src/base')
-rw-r--r--src/base/TextGL.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/base/TextGL.pas b/src/base/TextGL.pas
index 11bbd52b..bd505f51 100644
--- a/src/base/TextGL.pas
+++ b/src/base/TextGL.pas
@@ -212,7 +212,7 @@ begin
Result := 0;
Font := @Fonts[ActFont];
- for i := 0 to Length(text) -1 do
+ for i := 1 to Length(text) do
begin
Letter := Text[i];
Result := Result + Font.Width[Ord(Letter)] * Font.Tex.H / 30 * Font.AspectW;