Saludos
Si el problema es los formularios hijos puedes hacer esto antes del paso 1:
0) Cerrar todas las ventanas hijas activas
Código Delphi
[-]
var
n:integer;
Begin
for n:= frmprincipal.MDIChildCount-1 downto 0 do
frmprincipal.MDIChildren[n].Free;
Cita:
Empezado por Mi
Has un codigo que haga:
1) Oculte la ventana principal
2) Muestre la pantalla de acceso:
Acepta: 2.1) Muestra el Formulario Principal
Cancelar:2.2) Cierra la aplicacion completa
|