2 respuestas en este tema

[edorantes]

Hola amigos, alguno de ustedes sabe ¿como ocultar un form al mostrarlo? bueno mi situacion es esta tengo un login que en el evento OnShow  busca en un archivo .ini si es que ya existe un usuario, si es que si lo hay en entonces el form de el login se oculta y manda al formulario principal, pero si no hay usuario entonces se muesta el formulario de login, pero al tratar de ocultar el formLogin me manda un error este en mi codigo, he tratado con Hide y tambien me manda un error.

delphi

procedure TFormlogin.FormShow(Sender: TObject);
begin
 
    archivo := TIniFile.Create(ExtractFilePath(Application.ExeName)+'configuracion.ini');
    if (archivo.ReadString('blabla','blabla','')<>'')and (archivo.ReadString('blabla','blabla','')<>'') then begin
 
      FormMain.Visible := True;
      FormLogin.Visible := False;
     
 
    end;
 
 
 
 
end;

[cadetill]

Buenas,

Una pregunta....  ¿Para qué quieres tener creado el formulario? Es decir, en lugar de ocultarlo ¿Por qué no lo destruyes (y ya lo crearás cuando lo necesites)?

Sea como fuere, el Create o Show no son los sitios adecuados para la destrucción o ocultación de un formulario. Tienes que "esperar" a que éste esté creado y visible para ello. Como no tenemos un evento para este fin, en su día escribí una FAQ para solucionar este problema.

No obstante, tampoco creo que sea la solución más elegante para el problema que planteas. Lo que yo haría es lo siguiente.

delphi

if not TenemosAsignadoUsuario then
  if not Creamos_Y_Mostramos_Pantalla_Usuario then
    ControlDeError;
 
MostramosPantallaPrincipal;

Es decir, antes de crear/mostrar la pantalla de gestión de usuarios haces el control del archivo INI y, según el resultado, actúas.

Espero te sirva

Nos leemos

[escafandra]

Este ejemplo puede ser de tu interés. Muestra  una técnica de login al iniciar la aplicación.


Saludos.