Como hacer que no se cierre el formulario

[judoboy]

Hola tengo un formulario donde hago un UPDATE sobre una tabla.

Pues después de ejecutar la Query el formulario se me cierra.

¿Que tengo que hacer para que no se cierre?

[javiermorales]

¿Me puedes indicar, en que punto realizas la ejecución del Update?, es decir ¿que evento lo llama?

[judoboy]

pues lo hago en el onclick de un boton

[javiermorales]

Y en ese botón, ¿tan solo realizas la llamada al Update?. Si es así, yo realizaría un trazado de la ejecución y miraría paso a paso, que está ejecutando.

Un saludo.

[judoboy]

Esto es lo que hago



procedure TFrmPrincipalValidarPedidos1.BtnValidarClick(Sender: TObject);
var Validado,SentenciaSql:string;
begin
Validado:='SI';
SentenciaSql:='UPDATE PEDIDOS SET VALIDADO="'+Validado+'" WHERE CODIGO_PEDIDO="'+DBGResultados.Fields[0].Value+'"';
QValidar.Close;
QValidar.Sql.Clear;
QValidar.Sql.Add(SentenciaSql);
QValidar.ExecSQL;

ShowMessage('Pedido '+''+DBGResultados.Fields[0].Value+''+' Validado');




end;

[javiermorales]

Acabo de crear un formulario, que tiene un ADOQuery y un botón que ejecuta las mismas sentencias que tú y no se me cierra en ningún caso, a no ser que lo cierre de manera explícita.

Utilizo Delphi 7, puede que se trate de un problema de versión, ya que la ejecución de una SQL de actualización no debería implicar el cierre del formulario asociado.

Siento no poder ayudarte más.

Un abrazo.

[u1025425]

Seguramente has puesto un BitBtn, y tienes la propiedad ModalResult asignada... cambiala a mrNone.

[judoboy]

Perfecto, era eso muchas gracias.