Browse Source

Update zgl_text.pas

Seenkao 2 years ago
parent
commit
765ebf75ff
1 changed files with 1 additions and 1 deletions
  1. 1 1
      Zengl_SRC/src/zgl_text.pas

+ 1 - 1
Zengl_SRC/src/zgl_text.pas

@@ -130,6 +130,7 @@ var
   // Eng: scale for disabled flags, this scale will be used instead of the scale
   // Eng: scale for disabled flags, this scale will be used instead of the scale
   //      specified in the font.
   //      specified in the font.
   useScaleEx: Single;
   useScaleEx: Single;
+  textRGBA      : LongWord = $FFFFFFFF;
 
 
 implementation
 implementation
 uses
 uses
@@ -154,7 +155,6 @@ type
 end;
 end;
 
 
 var
 var
-  textRGBA      : LongWord = $FFFFFFFF;
   textStep      : Single = 0.0;
   textStep      : Single = 0.0;
   textLength    : Integer;
   textLength    : Integer;
   textLCoord    : zglPPoint2D;
   textLCoord    : zglPPoint2D;