Cita:
Empezado por Neftali
Tal vez tengas razón Josep, porque lo otro no tiene mucho sentido.
En ese caso, puedes coger un enfoque de cerrar la aplicación y volver a abrirla (1) o cerrar los formularios y lo que tengas abierto y volver a mostrar el formulario de Login (2); Algo así como volver al estado inicial.
En el caso (1) prueba con un botón y el siguiente código:
Código Delphi [-]
Self.Color := clNavy;
Application.ProcessMessages;
Sleep(1000);
Application.ProcessMessages;
Sleep(1000);
Application.ProcessMessages;
Application.Title := 'Cerrando...';
Application.Minimize;
WinExec(PChar(ParamStr(0)), 1);
Application.Terminate;
Exit;
|
Funciona perfecto, me lo habían pedido en alguna oportunidad, así que aprovecho la colaboración, gracias una vez más
__________________
Manuel Muñoz L. Trabajando con delphi 7.0 , migrando sistema a Delphi XE8, matando BDE y pasando FIREDAC.
|