Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #21  
Antiguo 02-06-2012
steelha steelha is offline
Miembro
 
Registrado: mar 2012
Posts: 158
Poder: 13
steelha Va por buen camino
Muchas gracias por la ayuda, al final tube que hacer una modificacion para que funcionara
Código Delphi [-]
program prIglesia;

uses
  Forms,
  Windows,
  Controls,
  uPrincipal in 'uPrincipal.pas' {frmprincipal},
  ufrmlogin in 'ufrmlogin.pas' {frmLogin};

{$R *.res}

begin
  Application.Initialize;

  frmLogin := TfrmLogin.Create(Application);
  frmLogin.ShowModal;
  if mrOk = 1 then  //anteriormente if frmlogin.showmodal = mrok
  begin
    frmLogin.Hide; // o LoginForm.Hide
    Application.CreateForm(Tfrmprincipal, frmprincipal);
  end;

  Application.Run;
end.

Gracias, Gracias por toda la ayuda ... no sera la ultima
pero aprendi algo hoy ... una simple linea te puede costar todo un dia de malhumor
Gracias roman, ecfisa, maeyanes
Responder Con Cita
  #22  
Antiguo 02-06-2012
Avatar de licha
licha licha is offline
Registrado
NULL
 
Registrado: mar 2012
Posts: 8
Poder: 0
licha Va por buen camino
Hola.
Estoy haciendo una ventana de iniciar sesion. La puse como form principal, pero al ocultarla (visible en false) se desaparece la aplicacion de la barra de herramientes. Queria saber si pudieran explicarme como hacer para que no suceda eso.
Aclaro que el inicio de sesion, la persona se logea con dni y password; y, segun su rol (que esta en la base de datos), se desplega la ventana adecuada. Esto lo hice, pero al ocultar la ventana de login, se desaparece de la barra de herramientas y no resulta practico... jajaja.
Estoy buscando la solucion al problema

Gracias
Responder Con Cita
  #23  
Antiguo 04-06-2012
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Cita:
Empezado por steelha Ver Mensaje
Código Delphi [-]
  if mrOk = 1 then  //anteriormente if frmlogin.showmodal = mrok
Esto no es correcto. mrOk es una constante cuyo valor es 1, de manera que la comparación siempe será cierta aún cuano el login no sea correcto.

// Saludos
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Ventana de Login al correr un programa Yasnet MySQL 12 16-11-2008 20:30:00
como crear una ventana de login wadhis Conexión con bases de datos 1 27-08-2008 09:47:26
Ayuda Con Ventana Para Login!!! jugomez MS SQL Server 5 23-10-2006 17:22:29
Problema al cerrar ventana de impresion salvanano Impresión 4 04-06-2005 20:21:20
Problema al cerrar una ventana noModal. Perenquen OOP 2 04-11-2004 14:35:43


La franja horaria es GMT +2. Ahora son las 09:35:20.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi