Form como una ventana más?

[lag_0]

Empezado por xEsk

Si te refieres a que un segundo formulario aparezca también en la barra de programas, pues es sencillo:

Aquí te pongo un ejemplo de como implementar el código (ese código debes ponerlo en los formularios que quieras hacer aparecer en la barra de programas):


Código Delphi [-]
TForm2 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
protected
procedure CreateParams(var Params: TCreateParams); override;
end;




E implementa el siguente código para el CreateParams:


Código Delphi [-]procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
with Params do
begin
ExStyle:=ExStyle or WS_EX_APPWINDOW;
WndParent:=GetDesktopwindow;
end;
end;




Ahora cuando se muestre este "TForm2" aparecerá como una "ventana independiente" en la barra de programas.

Saludos.

P.D.: Por "barra de programas" entiendo el espacio que hay entre el "Inicio" y "la hora", vamos donde se van poniendo los programas abiertos.

Perfecto..