uEditorBase.pas -> Cambiados los parámetros de creación del formulario para que no aparezca como ventana aparte de la aplicación en la barra de tareas hasta que no se implemente ventanas independientes.
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@182 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
parent
d61aa9fa28
commit
fc2c2b3e1d
@ -432,10 +432,16 @@ end;
|
||||
|
||||
procedure TfEditorBase.CreateParams(var params: TCreateParams);
|
||||
begin
|
||||
//No tocar, sirve para crear varios formularios hijos abiertos a la vez fuera de la aplicación principal
|
||||
inherited CreateParams( params );
|
||||
params.Style := params.Style and not WS_POPUP;
|
||||
params.ExStyle := params.ExStyle and not WS_EX_TOOLWINDOW or WS_EX_APPWINDOW;
|
||||
inherited CreateParams(params);
|
||||
|
||||
{ Descomentar para crear varios formularios hijos abiertos a la vez
|
||||
fuera de la aplicación principal pero cuidado por que las ventanas
|
||||
modales como la previsualización también se ven afectadas.
|
||||
|
||||
inherited CreateParams( params );
|
||||
params.Style := params.Style and not WS_POPUP;
|
||||
params.ExStyle := params.ExStyle and not WS_EX_TOOLWINDOW or WS_EX_APPWINDOW;
|
||||
}
|
||||
end;
|
||||
|
||||
function TfEditorBase.ShowModal: Integer;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user