minimizar formularios

[federiconqn21]

Hola:
Quisiera saber como hago para que,al minimizar un formulario,este quede en la barra de tareas(de la misma manera que se minimiza una ventana normal de windows),porque lo que me sucede es que cuando lo minimizo,queda minimizado en el escritorio,justo arriba de la barra de inicio y lo que yo quiero es que quede "en" la barra .
Agradezco a quien me pueda ayudar
Salu2

[jmariano]

Seguramente es porque no estás minimizando el formulario principal de la aplicación (el cual si se minimiza a la barra de tareas). Después de buscar por ahí, encontré un pequeño truco que permite que cada formulario de nuestra aplicación se minimize a la barra de tareas, el truco consiste en sobrecargar el método CreateParams de cada formulario (menos el principal) y especificar lo siguiente:

Código Delphi [-]
type
  TForm2 = class(TForm)
  ...
  protected
    procedure CreateParams(var Params: TCreateParams); override;
  ...
  end;

implementation

procedure TForm2.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
end;
...

Saludos!

[roman]

Estaba a punto de escribir esto que mencionas, pero en realidad no sé si Federico tiene claro exactamente qué es lo que quiere. Es decir, con este cambio en el estilo de la ventana, no es que se minimice a la barra de tareas sino que tiene un botón en la barra de tareas, independientemente de si está minimizada o no.

// Saludos

[jmariano]

Empezado por roman

Estaba a punto de escribir esto que mencionas, pero en realidad no sé si Federico tiene claro exactamente qué es lo que quiere. Es decir, con este cambio en el estilo de la ventana, no es que se minimice a la barra de tareas sino que tiene un botón en la barra de tareas, independientemente de si está minimizada o no.

Pues sip, tienes razón. Tal vez, una mejor manera de hacerlo (que, a lo mejor, se aproxima más a lo que quiere federiconqn21) es minimizando toda la aplicación al minimizar cualquiera de sus formularios, siempre que se trate, claro, de una aplicación tipo SDI.

Para ello, es necesario capturar el mensaje WM_SYSCOMMAND en todos los formularios exceptuando en el principal (que no hace falta):

Código Delphi [-]
type
  TForm2 = class(TForm)
  protected
    procedure WMSysCommand(var Message: TWMSysCommand); message WM_SYSCOMMAND;
  end;

implementation

procedure TForm2.WMSysCommand(var Message: TWMSysCommand);
begin
  if (Message.CmdType and $FFF0) = SC_MINIMIZE Then
  begin
    Message.Result := 0;
    Application.Minimize;
  end
  else inherited;
end;

(Por cierto, he decir que este truco tampoco es mio)

En fin, ya nos aclarará federiconqn21 que es lo que necesita realmente o si le vale alguna de estas técnicas.

Saludos!

[federiconqn21]

Hola Amigos:
Les agradezco que se hayan tomado el tiempo de responder mi inquietud.
Probe el ejemplo de jmariano,pero me aparece un error en la compilacion de mi proyecto que dice:

declaration of 'createParams' differs from previous declaration

.
Lo que quiero lograr con mi aplicacion es que se minimizen dentro de mi barra de tareas mis formularios,independientemente uno del otro,osea,no quiero que al minimizar un formulario se minimize toda la aplicacion,que es lo que ocurre con mi formulario principal.seria bueno que se minimizen independientemente,pues imaginen en que problema me meteria si queda abierto algun formulario donde tengo que hacer 'click' en algun boton de confirmacion,y este formulario no se ve,porque lo 'tapan' los demas.jaa.
Espero haberme explicado bien,y espero su respuesta,que seguro me va a ayudar en lo que necesito
Salu2

[jmariano]

Sobre el error que te da en CreateParams, es posible que estés utilizando una versión diferente de Delphi (yo uso la v7), revisa la ayuda sobre este método a ver como te dice que es la declaración (y fíjate que en la parte de implementation esté declarada igual que en la clase).

Con respecto a lo que comentas sobre los formularios, si alguno es necesario "confirmarlo" antes de cerrar la aplicación, lo podrías mostrar en "modal" para no permitir al usario ejecutar otro formulario hasta que lo "confirme".

Saludos!

[federiconqn21]

Hola nuevamente:
Bien,ya no tengo el error antes mencionado,pero ahora tengo otro error.
cuando ejecuto mi aplicacion y pretendo abrir mi formulario al cual le he agregado el metodo "CreateParams",me aparece el mensaje de error que dice:
'El PArametro No Es Correcto',revise la sintaxis y que este declarado igual a como esta definido,lo curioso es que cuando se prodeuce el error,el debugger se posiciona sobre la instruccion Form3.Open(en la unidad del formulario Form3 es donde agregue el metodo CreateParams).
No se como proceder ante este fenomeno informatico,ja.

[serhasae]

Roman he probado los dos formas con Delphi 6 Enterprise y hacen lo mismo se situa encima de la barra de tareas a la izquierda del todo encima de inicio. Saludos.