Código:
try
query.ExecSQL;
except
on e:exception do
begin
ShowMessage(e.exception); //si comentas esta linea sólo verás tú mensaje.
ShowMessage('Error al actualizar BD.');
end;
end;
__________________
Saludos,
Peter Investment
Última edición por Investment fecha: 10-02-2005 a las 11:25:38.
|