Ayuda con EDBEngineError

[chino150]

Hola para Todos

Necesito ayuda con el siguiente error Project Aportaciones.exe raised exception class EDBEngineError with message 'Could not find object'.

Estoy utilizando Delphi 6 con el bde y paradox 7 el codigo del formulario es

Codigo Delphi[]

if RbSi.Checked = True then
begin
QRRecibo := TQRRecibo.Create(Self);
QRRecibo.QOfrendas.Params[0].Value := NoRecibo;
QRRecibo.QOfrendas.Open;
try
if RbSi.Checked = True then
QRRecibo.Preview;
finally
QRRecibo.Free;
end;
end;
end;

Gracias mil

[enecumene]

Hola,

if RbSi.Checked = True then
begin
QRRecibo := TQRRecibo.Create(Self);
QRRecibo.QOfrendas.Close; //Es bueno cerrar la tabla antes de cualquier cosa.
QRRecibo.QOfrendas.Params[0].Value := NoRecibo;
QRRecibo.QOfrendas.Open;
try
if RbSi.Checked = True then //Esto está de más
QRRecibo.QuickRep.Preview; //Creo que te faltó esto aquí
finally
QRRecibo.Free;
end;
end;
end;

Suponiendo que QRRecibo es el Form, sino es así debes colocar el Form delante.

Saludos.

[Lepe]

PreviewModal.... usa PreviewModal....


Saludos

[chino150]

Lo e entendado de las dos formas y sigue el miso error solo sale cuando utilizo el params pero cuando no utilizo el params el reporte sale en blanco solo se ve los QRLabels no se que estoy haciendo mal.

[eduarcol]

lo que esta pasando es que en la consulta no debes estar especificando los parametros, escribela aqui para ver como la haces, el EDBEngineError lo devuelve el Motor de base de datos asi que hay que apuntar por ese lado.

[chino150]

Gracias es correcto lo que me dices.