0

¿Cómo se puede lograr que un formulario secundario aparezca en la barra de tareas de Windows en Delphi?

He visto varias aplicaciones dónde cuándo se abre una nueva ventana, se crea un botón nuevo para dicha ventana secundaria en la barra de tareas, sin crear un nuevo proceso. Por defecto, en una aplicación escrita en Delphi se pueden crear y mostrar formularios secundarios, pero solamente aparece un botón en la barra de tareas de Windows, no se visualizan separadas al hacer alttab.

¿cómo puedo cambiar este comportamiento?

Mi código actual luce como este:

procedure Form1ButtonClick(Sender: TObject);
begin
  Form2.Show;
end;

He estado pensando llamar a CreateWindowEx, pero mi solución ideal debiera ser más simple que tener que llamar directamente a la API de Windows.

1 respuesta 1

2

Se puede lograr lo que quieres sobreescribiendo el método CreateParams del/los formulario/s que quieres que tengan su propio botón en la barra de tareas. Con la solución propuesta, estos formularios también se minimizarán de manera independiente, así:

interface

type
  TMyForm = class(TForm)
  ...
  protected
    procedure CreateParams(var Params: TCreateParams) ; override;
  ...

implementation

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

De hecho, podrás encontrar una explicación más amplia (en Inglés) en el artículo Minimize child forms independent of the main form en delphi.about.com

Ten en cuenta que el artículo referenciado en about.com es incorrecto en cuanto a establecer como WndParent del formulario al escritorio. En el blog "The Old New Thing" encontramos una grandiosa explicación (en Inglés) de por que es incorrecto hacer el escritorio el padre de las ventanas de tu aplicación.

Con información de How can I get taskbar buttons for forms that aren't the main form?

Tu Respuesta

By clicking “Publica tu respuesta”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

¿No es la respuesta que buscas? Examina otras preguntas con la etiqueta o formula tu propia pregunta.