Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Formulario tape pantalla completa (https://www.clubdelphi.com/foros/showthread.php?t=51201)

kapullok_2006 08-12-2007 10:46:05

Formulario tape pantalla completa
 
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.

dec 08-12-2007 11:12:00

Hola,

Además de lo que has mencionado tienes que poner el formulario "on top" para que tape también la barra de herramientas.

kapullok_2006 10-12-2007 16:35:09

¿a qué te refieres con Form 'on top'?.
Hay una propiedad del Form,que se llama 'Top',pero creo que no es eso a
lo que te refieres.

SAludos.


La franja horaria es GMT +2. Ahora son las 23:30:16.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi