Acana_Interiorismo/FactuGES2
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

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.

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@79 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
David Arranz 2008-01-02 10:48:43 +00:00
parent 52667fd222
commit bd54cccbd5
1 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
Source/GUIBase/uEditorBase.pas
View File

@ -432,10 +432,16 @@ end;
procedure TfEditorBase.CreateParams(var params: TCreateParams); procedure TfEditorBase.CreateParams(var params: TCreateParams);
begin begin
//No tocar, sirve para crear varios formularios hijos abiertos a la vez fuera de la aplicación principal inherited CreateParams(params);
inherited CreateParams( params );
params.Style := params.Style and not WS_POPUP; { Descomentar para crear varios formularios hijos abiertos a la vez
params.ExStyle := params.ExStyle and not WS_EX_TOOLWINDOW or WS_EX_APPWINDOW; 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; end;
function TfEditorBase.ShowModal: Integer; function TfEditorBase.ShowModal: Integer;