minimizar formulario

[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.

[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

[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!