Consejos para ventanas modales ?

[roman]

¿Y qué pasa si le dan al botón cancelar? (porque hay un botón cancelar ¿no?)
Supongo que entonces cerrarás el formulario principal terminando la aplicación. Pero entonces ¿para qué abriste el formulario principal?

La razón de estas preguntas es para comentarte que me parece más adecuado presentar primero que nada la ventana de usuario y contraseña, y sólo si los datos son validados presentar la ventana principal.

Para hacer esto basta que modifiques tu archivo dpr más o menos así:

Código Delphi [-]
begin
  Application.Initialize;

  VentanaLogin := TVentanaLogin.Create(nil);
  if VentanaLogin.ShowModal = mrOk then
  begin
    VentanaLogin.Free;

    Application.CreateForm(TVentanaPrincipal, VentanaPrincipal);
    Application.Run;
  end;
end.

Si el usuario cancela entonces Application.Run no se ejecuta y no se construye la ventana principal terminándose así la aplicación.

// Saludos

pd: ¿El borde? bsDialog