Error al minimizar

[radenf]

Estimado gdlrinfo:

Yo no puedo adivinar qué contiene o qué hace cada uno de tus Forms.
¿Los formularios los creas a medida que los necesitas o ya los has creado al iniciar el programa?
Con tu proyecto cargado revisa en el menú principal de Delphi >Project>Options>Forms = Main form. Este es el que se abre primero.
Si inicias el programa con el Form de Login, donde se pide usuario y pass, este debiera ser el Main Form y desde él abrir el Form que tu quieras.

Salu2

[gdlrinfo]

hola radenf en te comento que si pongo como form1 principal el cual es el principal y no el 3 como esta ahora es que me auto crea primero el principal y yo necesito que me cree primero el form3 que tiene la clave... ahora bien si yo creo primero el principal si me anda lo de minimizar, ahora si creo primero el form3 del usuario ya no lo hace..
Esto de crear primero el form3 no es un capricho sino es que necesito que sea el primero que se crea ya que tiene que aprobar los usuarios antes de darle la entrada un abrazo y gracias por tu respuesta !!



Aclaro que en el anterior estaba mal expresado

Código Delphi [-]
begin
  Application.Initialize;
  Application.MainFormOnTaskbar := true; //esta en true
  TStyleManager.TrySetStyle('Silver');
  Application.CreateForm(TForm3, Form3);//// pero este no es el principal sino el de usuario.
  Application.CreateForm(TForm1, Form1);//// este es el form principal.
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm4, Form4);

[radenf]

Prueba colocar en el evento onCreate del form que aparece minimizado lo siguiente:

Código Delphi [-]
WindowState.wsMaximized;

Saludos

[[nlsgarcia]]

gdlrinfo,

Empezado por gdlrinfo

...tengo un problema al minimizar mi programa desde el Form3 este queda sobre la barra de tareas y no en la barra...el Form3 de mi software es un formulario que pide usuario y password, el Form1 (Principal) no es ese que no tiene ningún botón sino el Form3...

Revisa este código:

Código Delphi [-]
program Project1;

uses
  Windows,
  Controls,
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2};

var
   Form1 : TForm1;

{$R *.res}

begin

   Application.Initialize;
   Application.MainFormOnTaskBar := True;
   Application.Title := 'Test Application';

   Form1 := TForm1.Create(Application); // Form1 No AutoCreate

   SetWindowLong(Form1.Handle,GWL_EXSTYLE,(GetWindowLong(Form1.Handle,GWL_EXSTYLE) or WS_EX_APPWINDOW));

   if Form1.ShowModal = mrOK then
      Application.CreateForm(TForm2, Form2) // Form2 AutoCreate MainForm
   else
      Application.Terminate;

   Application.Run;

end.

El código anterior en Delphi 2010 sobre Windows 7 Professional x32, permite crear un formulario Form1 de Login en modo ShowModal, el cual tendrá su icono sobre el ToolBar de Windows de forma Standard al igual que el formulario principal Form2, la configuración de creación de los formularios en el proyecto se muestra en la siguiente imagen:



Espero sea útil

Nelson.

[gdlrinfo]

Hola agradezco a todos por las respues y probe tu ayuda nlsgarcia pero me hacia lo mismo lo que hice fue algo parecido a lo que me dices pero en vez de que cree los form al iniciar lo hago cuando los voy a usar por ejemplo asi :

Código Delphi [-]
Application.CreateForm(TForm2, Form2);
Form2.Show;

De esta manera no me crea los form al abrirlo sino cuando los uso y puse el 3 como principal y ahora si se minimiza perfecto agradezco la ayuda de todos como siempre y les mando un abrazo !

[[nlsgarcia]]

gdlrinfo,

Empezado por gdlrinfo

...lo que hice fue algo parecido a lo que me dices...ahora si se minimiza perfecto...

Empezado por gdlrinfo

...probé tu ayuda nlsgarcia pero me hacia lo mismo...

Te comento:

1- El código propuesto en el Msg #9, funciona correctamente según lo esperado en las pruebas realizadas con Delphi 2010 sobre Windows 7 Professional x32.

2- La clave del código propuesto es la función SetWindowLong

Espero sea útil

Nelson.

[roman]

Empezado por nlsgarcia

Puede ser que me equivoque, pero me parece que el problema que gdlrinfo tenía es que al minimizar el formulario "principal" se quedaba arriba de la barra de tareas, cosa que sucede con cualquier formulario secundario. Y sucedía porque tal formulario "principal" realmente no lo era. Para la VCL el formulario principal es el primero que se crea con Application.CreateForm.

Por eso, en tu código, la clave realmente no está en el SetWindowLong, sino en en crear el formulario del Login con TForm1.Create en lugar de Application.CreateForm.

// Saludos