Text Q

[Andreaz]

oh, I see. thanks for the reply *reads lesson *13*

BTW: any good suggestions on how to create text effects such as fade out, deformation etc?

Sorry, missed the btw before, here's some tips for text effects:

Fading:
[pascal]
GLXFont1.Items[0].Color.Alpha:= Sin(GLXTimer1.ElapsedTime / 1000);
GLXFont1.Items[0].TextOut(0,0, Text);
[/pascal]

Deformation - Horisontal scale;
[pascal]
glPushMatrix();
glScalef(Sin(GLXTimer1.ElapsedTime / 1000),1,1);
GLXFont1.Items[0].TextOut(0,0, Text);
glPopMatrix();
[/pascal]

Deformation - Per character rotation (really cool):
[pascal]
var Text: String;
var Counter: Integer;

glPushMatrix();
glTranslatef(0,64,0);
For Counter:=1 to Length(Text) do begin
glPushMatrix();
glScalef(1, Sin(GLXTimer1.ElapsedTime / 1000 + Counter / 10),1);

GLXFont1.Items[0.TextOut(GLXFont1.Items[0].TextWidth(Copy(Text,1, Counter)),0,Text[Counter]);
glPopMatrix();
end;
glPopMatrix();
[/pascal]