FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
#1
|
||||
|
||||
Cerrar formulario
Para probar que un código es correcto estoy forzando que tenga lugar un error al ejecutar un query en FB.
Código:
void __fastcall TfLisCar::FormCreate(TObject *Sender) { Query->Close(); Query->SQL->Text = "SELECT DISTINCT Codigo, Nombre Ls02 WHERE CodPrv = 45 ORDER BY Nombre, Codigo"; try { Query->Open(); } catch(Exception *Exc) { ShowMessahe(Exc->Message); this->Close(); return; } } |
#2
|
||||
|
||||
Supongo que no has hecho un copia->pega del código, porque no debería compilar, salvo que hayas creado un ShowMessahe
Código:
ShowMessahe(Exc->Message) |
#3
|
||||
|
||||
No, es una errata. Es evidente que es ShowMessage-
|
#4
|
||||
|
||||
Hola Angel.Matilla.
Código PHP:
Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#5
|
||||
|
||||
Lo mejor creo que sería meter tu código en el constructor, redefiniendo el de TForm (override)
Si hay excepciones se destruye el objeto automáticamente y ni hace falta llamar a Close |
#6
|
||||
|
||||
Cita:
También lo había pensado (o incluso ANTES del Application->CreateForm), pero lo pongo dentro del formulario porque si me hace falta me basta llamar al evento para volve a ejecutar sin necesidad de tener que poner el código dos veces. |
#7
|
||||
|
||||
Close no funciona en el evento OnCreate (tampoco lo hace en delphi), si quieres que en él se cierre el formulario debes usar un mensaje:
Código PHP:
Código PHP:
Saludos. |
#8
|
||||
|
||||
Hola Angel.Matilla.
Cita:
Código PHP:
Te adjunto un demo para que puedas corroborarlo. Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Cerrar Formulario | jjmtzhdz | Varios | 7 | 19-11-2012 05:43:15 |
Cerrar Formulario | Red_Leon | OOP | 13 | 08-02-2010 10:22:07 |
cerrar formulario | Patricio | Varios | 2 | 04-07-2008 23:52:27 |
Cambiar propiedad de componente del formulario padre al cerrar el formulario hijo | jzginez | OOP | 5 | 22-06-2007 21:40:51 |
Cerrar conexión al cerrar formulario | arantzal | Conexión con bases de datos | 5 | 09-08-2006 12:43:52 |
|