minimizar formulario

[mizzard]

Hola, tengo un formulario de bienvenida que pide una contraseña, en cuanto se introduce correctamente, hago lo siguiente:

TfrmMain *frmMain;
        frmMain = new TfrmMain(this);
        frmPassword->Visible=false;
        frmMain->Timer1->Enabled=true;
        frmMain->ShowModal();

En el evento OnClose introduzco este código para cerar ambos formularios ya que lo que hago con el de la contraseña es ocultarlo:

    this->Close();
    frmPassword->Close();

El problema que tengo es que cuando estoy en el segundo formulario (con el de la contraseña visible =false), y le doy a minimizar en lugar de aparecerme en la barra de inicio, se va a abajo a la izquierda y desaparece, por lo q me toca dar ALT+TAB para volver a restaurarlo...

Como propiedades he puesto:

Botones de cerrar y minimizar
el estilo del borde single
style form normal
posicion desktop center
y windows state Normal

Alguna idea de pq puede ser??, puede que haga mal lo de ocultar el form de password y deberia hacerlo de otra forma mejor??

Muchas gracias y espero q mis threads sirvan a mas gente!!!

Un saludo!

[[Caral]]

Hola
El problema es la llamada al form que loguea.
Tienes el form principal y el loguin.
En el evento Oncreate del form principal llama al form loguin, si estan correctos los datos el loguin se cierra, NO SE OCULTA.
Saludos

[mizzard]

Hola, gracias por la respuesta.

Lo que hice en su momento es como el formulario del login es el primero en mostrar, lo tengo como principal y el otro como secundario.... supongo que esto viene indicado aqui:

WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int)
{
    try
    {
        Application->Initialize();
        Application->MainFormOnTaskBar = true;
        Application->CreateForm(__classid(TfrmPassword), &frmPassword);
        Application->CreateForm(__classid(TfrmMain), &frmMain);
        Application->Run();

Me dices que deberia cambiar el orden y el el evento del Main, antes de nada mostrar el frmPassword y si todo OK, entonces cerrarlo y visualizar el frmMain?

Un saludo y gracias!

[_cero_]

Hola. ps si el problema es que la aplicación toma como formulario padre al primer form que se crea teniendo como padre a “Application”, entonces lo que puedes hacer es crear tu form password sin padre y desde el crear el principal si es que dan la contraseña correcta.

Algo así

WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int)
{
    try
    {
        Application->Initialize();
        Application->MainFormOnTaskBar = true;

        TForm2* f2=new TForm2(NULL); // Creas un form sin padre y desde el creas el principal con Application->CreateForm
        f2->ShowModal();             //
        delete f2;                   // Si no creas un form principal la aplicación se cerrara cuando cierres form2

        Application->Run();
    }
...

Pd. Te adjunto un ejemplo para que veas como.
http://www.megaupload.com/?d=D5S58JTH

[[escafandra]]

Yo propongo algo parecido a la propuesta de _cero_ con otro enfoque:

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
   try
   {
       Application->Initialize();

       TLogin *Log = new TLogin(0);
       if(Log->ShowModal() == mrOk)
          Application->CreateForm(__classid(TForm1), &Form1);
       delete Log;
       Application->Run();
   }
//.................................................................

Si la salida del Log->ShowModal el mrOk el programa continua, si no, se termina. TLogin se encargará de gestionar si el usuario se autentificó de forma correcta y en ese caso devolverá mrOK.

void __fastcall TLogin::Button1Click(TObject *Sender)
{
   if(Edit1->Text == "1234")
     ModalResult = mrOk;
   else
     ModalResult = mrCancel;
}

Subo un ejemplo.

Saludos.

[mizzard]

Muchas gracias a ambos por la respuesta, en tener un poco de tiempo lo pruebo, pero vamos, con el ejemplo adjunto no creo que tenga problemas .

Un saludo!

[Angel.Matilla]

Empezado por escafandra

Yo propongo algo parecido a la propuesta de _cero_ con otro enfoque:

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
   try
   {
       Application->Initialize();

       TLogin *Log = new TLogin(0);
       if(Log->ShowModal() == mrOk)
          Application->CreateForm(__classid(TForm1), &Form1);
       delete Log;
       Application->Run();
   }
//.................................................................

Si la salida del Log->ShowModal el mrOk el programa continua, si no, se termina. TLogin se encargará de gestionar si el usuario se autentificó de forma correcta y en ese caso devolverá mrOK.

void __fastcall TLogin::Button1Click(TObject *Sender)
{
   if(Edit1->Text == "1234")
     ModalResult = mrOk;
   else
     ModalResult = mrCancel;
}

Subo un ejemplo.

Saludos.

Me gusta este planteamiento que haces para un formulario de login. ¿Puedes pasarme el ejemplo que añadiste en este hilo? El enlace de descarga no me funciona.

[[escafandra]]

Empezado por Angel.Matilla

Me gusta este planteamiento que haces para un formulario de login. ¿Puedes pasarme el ejemplo que añadiste en este hilo? El enlace de descarga no me funciona.

Aquí está: Login.rar

Saludos.

[Angel.Matilla]

Muchas gracias