Ver Mensaje Individual
  #1  
Antiguo 08-01-2015
Avatar de aguml
aguml aguml is offline
Miembro
 
Registrado: may 2013
Posts: 885
Reputación: 12
aguml Va por buen camino
Form Modal me deja congelado el proceso

Pues amigos, al no saber como crear un MessageBox con botones con textos personalizados, pues me he creado un nuevo form que muestro y elijo el boton que sea y esa es la idea pero no va como esperaba. Hago esto:

Linea que muestra el form del dialogo desde el form principal:
Código PHP:
DialogQuerySaveAs->ShowModal(); 
Form que nos pregunta que queremos hacer:
Código PHP:
#include <vcl.h>
#pragma hdrstop

#include "DialogQuerySaveAs.h"
#include "UnitMain.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TDialogQuerySaveAs *DialogQuerySaveAs;
//---------------------------------------------------------------------------
__fastcall TDialogQuerySaveAs::TDialogQuerySaveAs(TComponentOwner)
   : 
TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TDialogQuerySaveAs::FormShow(TObject *Sender)
{
   
FormMain->IdValorSaveAs ID_ERROR;
   
DialogQuerySaveAs->Close();
}
//---------------------------------------------------------------------------

void __fastcall TDialogQuerySaveAs::Button1Click(TObject *Sender)
{
   
FormMain->IdValorSaveAs ID_IMAGE_TO_FILE;
   
DialogQuerySaveAs->Close();
}
//---------------------------------------------------------------------------

void __fastcall TDialogQuerySaveAs::Button2Click(TObject *Sender)
{
   
FormMain->IdValorSaveAs ID_IMAGE_TO_CLIPBOARD;
   
DialogQuerySaveAs->Close();
}
//---------------------------------------------------------------------------

void __fastcall TDialogQuerySaveAs::Button3Click(TObject *Sender)
{
   
FormMain->IdValorSaveAs ID_FLOW_TO_FILE;
   
DialogQuerySaveAs->Close();
}
//---------------------------------------------------------------------------

void __fastcall TDialogQuerySaveAs::Button4Click(TObject *Sender)
{
   
FormMain->IdValorSaveAs ID_CANCELAR;
   
DialogQuerySaveAs->Close();
}
//--------------------------------------------------------------------------- 
El caso es que parece ir todo bien, obtengo el valor y todo y salgo del metodo desde donde llamo a ShowModal pero se queda congelado el form principal. Supongo que lo que hago es una salvajada pero no se me ocurrio nada mejor asi que, si podeis ayudarme, por favor ayudenme .
Responder Con Cita