BorderIcons false

[jhonny]

El código de Roman es bastante Ingenioso (Sera Ingeniero? ) y te servirá para modificar dicha propiedad a los Forms que estén en pantalla en ese momento, yo lo llamaría justo después de crear el form.

[[Caral]]

Hola JHonny
Lo he intentado en el form create del form principal, pero no hace su funcion.
Me explico, si elimina el problema de este form principal, pero no de los que le siguen, osea solo del primero, no los demas.
Habra alguna forma de que lo haga.?
Saludos

[roman]

Si tus formularios los tienes en el Autocreate, entonces, en el archivo dpr verás algo como:

Código Delphi [-]
begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);
  ...
  Application.Run;
end;

Pon el código después de la creación de los formularios:

Código Delphi [-]
var
  J: Integer;

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);
  ...

  for J := 0 to Screen.FormCount - 1 do
    Screen.Forms[J].BorderIcons := [];

  Application.Run;
end;

// Saludos

[[Caral]]

Gracias Roman
Hay es donde lo puse, el problema es que son tantos que no los tengo en el Autocreate por que se alenta mucho el programa.
Cada form lo llamo directamente y luego lo destruyo asi:

Código Delphi [-]
  FLogin:=TFLogin.Create(self);
   try
     FLogin.ShowModal;
   finally
     FLogin.Free;
   end;

En el autocreate solo tengo el datamodule y el form principal.
Saludos

[roman]

Entonces este método no te sirve porque un formulario se añade al arreglo Screen.Forms sólo hasta que se crea.

Lo que no entiendo es porqué quieres hacerlo por código. ¿Por qué no simplemente cambias la propiedad en los formularios?

// Saludos

[jhonny]

Empezado por roman

Lo que no entiendo es porqué quieres hacerlo por código. ¿Por qué no simplemente cambias la propiedad en los formularios?

// Saludos

Supongo que precisamente eso es lo que quiere evitar debido a que son muchos los forms del su proyecto.

[[Caral]]

Hola Roman
Tienes razon, se puede hacer de form a form, la verdad es ahorrar trabajo, son muchos entonces se me ocurrio nada mas.
Tal vez se te ocurre algo, no se.
Saludos

[jhonny]

Si quieres aprender sobre heredar Forms Creo que en la cara Oculta de Delphi 4 hablan sobre el tema "Herencia Visual" que seguramente leer al respecto te serviría bastante, Además no es tan complicado aprenderlo (A veces es el nombre el que nos asusta un poco ).