diff options
author | f1fth_freed0m <f1fth_freed0m@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-03-07 04:08:32 +0000 |
---|---|---|
committer | f1fth_freed0m <f1fth_freed0m@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-03-07 04:08:32 +0000 |
commit | 1223a8bd5aee17e9a0f1f1a943aa264ddec30977 (patch) | |
tree | 830f190ac2675008ea579223845082299162742f /Game/Code/Classes/TextGL.pas | |
parent | 05c25746d8bc1f313c2b6f07b8d34e8a8a71df9b (diff) | |
download | usdx-1223a8bd5aee17e9a0f1f1a943aa264ddec30977.tar.gz usdx-1223a8bd5aee17e9a0f1f1a943aa264ddec30977.tar.xz usdx-1223a8bd5aee17e9a0f1f1a943aa264ddec30977.zip |
Translated some Variables
Ilosc To Number
Pet To Count
Tekst To Text
NrCzesciP To LineNumber
NrCzesci To LineNumber
AktSong To CurrentSong
AktNuta To CurrentNote
Some Translations In ModiSDK on TSentences
Maybe Plugin Code Needs to be Updated
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@927 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game/Code/Classes/TextGL.pas')
-rw-r--r-- | Game/Code/Classes/TextGL.pas | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/Game/Code/Classes/TextGL.pas b/Game/Code/Classes/TextGL.pas index f6c04b3a..c29648c3 100644 --- a/Game/Code/Classes/TextGL.pas +++ b/Game/Code/Classes/TextGL.pas @@ -109,14 +109,14 @@ procedure BuildFont; // Build Our Bitmap Font {$ELSE}
var
- Rejestr: TResourceStream;
+ Reg: TResourceStream;
begin
try
- Rejestr := TResourceStream.Create(HInstance, aResourceName , pchar( aType ) );
+ Reg := TResourceStream.Create(HInstance, aResourceName , pchar( aType ) );
try
- Rejestr.Read(Fonts[ aID ].Width, 256);
+ Reg.Read(Fonts[ aID ].Width, 256);
finally
- Rejestr.Free;
+ Reg.Free;
end;
{$ENDIF}
@@ -126,7 +126,7 @@ procedure BuildFont; // Build Our Bitmap Font end;
var
- Pet: integer;
+ Count: integer;
begin
ActFont := 0;
@@ -175,21 +175,21 @@ begin loadfont( 2, 'FNT', 'FontO' );
loadfont( 3, 'FNT', 'FontO2' );
-{ Rejestr := TResourceStream.Create(HInstance, 'FontO', 'FNT');
- Rejestr.Read(Fonts[4].Width, 256);
- Rejestr.Free;}
+{ Reg := TResourceStream.Create(HInstance, 'FontO', 'FNT');
+ Reg.Read(Fonts[4].Width, 256);
+ Reg.Free;}
- for Pet := 0 to 255 do
- Fonts[1].Width[Pet] := Fonts[1].Width[Pet] div 2;
+ for Count := 0 to 255 do
+ Fonts[1].Width[Count] := Fonts[1].Width[Count] div 2;
- for Pet := 0 to 255 do
- Fonts[2].Width[Pet] := Fonts[2].Width[Pet] div 2 + 2;
+ for Count := 0 to 255 do
+ Fonts[2].Width[Count] := Fonts[2].Width[Count] div 2 + 2;
- for Pet := 0 to 255 do
- Fonts[3].Width[Pet] := Fonts[3].Width[Pet] + 1;
+ for Count := 0 to 255 do
+ Fonts[3].Width[Count] := Fonts[3].Width[Count] + 1;
-{ for Pet := 0 to 255 do
- Fonts[4].Width[Pet] := Fonts[4].Width[Pet] div 2 + 2;}
+{ for Count := 0 to 255 do
+ Fonts[4].Width[Count] := Fonts[4].Width[Count] div 2 + 2;}
end;
|