diff options
author | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-06-14 13:08:54 +0000 |
---|---|---|
committer | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-06-14 13:08:54 +0000 |
commit | 5f45fd926da919d8057dfcca4101dc305bd230df (patch) | |
tree | c9256ffdedd42363296501b314f9759bfe8b7b19 /Game/Code/Menu/UMenuText.pas | |
parent | 3ecabca816142dcc2b7044aa637285514a4f9b2d (diff) | |
download | usdx-5f45fd926da919d8057dfcca4101dc305bd230df.tar.gz usdx-5f45fd926da919d8057dfcca4101dc305bd230df.tar.xz usdx-5f45fd926da919d8057dfcca4101dc305bd230df.zip |
Added Text Fading to ButtonCollection
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@262 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game/Code/Menu/UMenuText.pas')
-rw-r--r-- | Game/Code/Menu/UMenuText.pas | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Game/Code/Menu/UMenuText.pas b/Game/Code/Menu/UMenuText.pas index 69ece02f..4713962e 100644 --- a/Game/Code/Menu/UMenuText.pas +++ b/Game/Code/Menu/UMenuText.pas @@ -23,6 +23,7 @@ type ColR: real;
ColG: real;
ColB: real;
+ Alpha: real;
Int: real;
Style: integer;
Visible: boolean;
@@ -225,7 +226,7 @@ begin SetFontStyle(Style);
SetFontSize(Size);
SetFontItalic(False);
- glColor3f(ColR*Int, ColG*Int, ColB*Int);
+ glColor4f(ColR*Int, ColG*Int, ColB*Int, Alpha);
//If Selected Set Blink...
if SelectBool then
@@ -303,6 +304,7 @@ end; constructor TText.Create(ParX, ParY, ParW: real; ParStyle: integer; ParSize, ParColR, ParColG, ParColB: real; ParAlign: integer; ParTekst: string);
begin
inherited Create;
+ Alpha := 1;
X := ParX;
Y := ParY;
W := ParW;
|