[kapullok_2006]

Hola,tengo este código:

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, ExtCtrls, Transfor;

type
  TForm1 = class(TForm)
    Timer1: TTimer;
    procedure FormActivate(Sender: TObject);
    procedure Timer1Timer(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
   X, Y, DX, DY: Integer;

implementation

{$R *.DFM}


procedure TForm1.FormActivate(Sender: TObject);
begin
  WindowState := wsMaximized;
  Timer1.Interval := 150;
  Randomize;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  X := Random(Screen.Width - 400);
  Y := Random(Screen.Height - 400);
  DX := Random(400);
  DY := Random(400);
  Canvas.Font.Color := Random(65535);
  Canvas.Font.Size := Random(25);
  Canvas.TextOut(X + DX,Y + DY,'¡Antonio!');

end;

end.

Un amigo,me ha pasado un proyecto donde,al ejecutar la aplicacion,genera
las palabras de manera aleatorio en el Form.El Color del Form,es negro y ocupa toda la ventana.Creo que no es sólo por la propiedad WindowState:=wsMaximized,sino por alguna otra propiedad del Form,que no logro sacar.Para mi proyecto ten un Form,que le he puesto un TImage,que
está puesta a alClient.El Form no tapa la barra de herramientas,que es lo que quiero conseguir.He probado con alguna funcion que me oculta la barra,pero deja el hueco de la barra,y el Form no tapa ese hueco.

¿Sabéis de alguna propiedad del Form que resuelva mi problema?
Saludos.