aboutsummaryrefslogtreecommitdiffstats
path: root/src/base/TextGL.pas
diff options
context:
space:
mode:
authortobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-11-09 19:49:28 +0000
committertobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-11-09 19:49:28 +0000
commitbe8d1f265179826c6d189019298e88675b12210f (patch)
tree2de43aa4281d4e54f2b608b1a968c01b1a1489b5 /src/base/TextGL.pas
parent912d54923bd0180374b353688fed6ad4ddf41168 (diff)
downloadusdx-be8d1f265179826c6d189019298e88675b12210f.tar.gz
usdx-be8d1f265179826c6d189019298e88675b12210f.tar.xz
usdx-be8d1f265179826c6d189019298e88675b12210f.zip
lyric fix
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1513 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/base/TextGL.pas')
-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;