Во весь экран

[Dr.Win32]

form1.borderstyle:=bsnone;
form1.color:=0;
form1.left;=0;
form1.top;=0;
form1.width:=screen.width;
form1.height:=screen.height;
label1.caption:='';

procedure tform1.timer1timer(sender: TObject);
begin
if i<=length(s) then begin
label1.caption:=label1.caption+s[i];
inc(i);
end;
end;
end.

var
form1:tform1;
s:string='Твой текст';
i:integer=1;

From artemavd: Не забываем оформлять код тегом #