Ayuda con Formularios MDI.

[[jcarteagaf]]

Hola.

Yo hago lo siguiente en mis programas: MI forma principal es MDIForm y las ventas hijas MDIChild y las ventanas modales Normal, entre estas ultimas la ventana de Login.

En el evento onshow de la ventana principal llamo a una funcion que muestra la pantalla de login, verifica los derechos de acceso del usuario y devuelve True si el usuario tiene acceso o FAlse en caso contrario. Algo asi:


procedure TMain.FormShow(Sender: TObject);
begin
if not FuncionLogin() then
begin
Application.Terminate;
exit;
end;
// el resto del codigo de formshow
....
end;

Espero que te sirva.

Saludos