[Resolvido] qreport 3, could not find object

[Lillyp 0]

Estou com problemas para usar o QReport.

 

O relatório já está feito, porém quando clica no botão que chama ele, aparece a mensagem de erro " Could not find object".

O que pode ser?

 

procedure TFDoadoresAptos.BtimprimirClick(Sender: TObject);

begin

with tfqrdoadoresaptos.create(application) do

begin

qdoadoresaptos.Active:=false;

qdoadoresaptos.DatabaseName:= DBNamePadrao.Database.DatabaseName;

//qdoadoresaptos.SQL

//qdoadoresaptos.ParamByName

qdoadoresaptos.Active:=true;

qr1.prepare;

qr1.Preview;

free;

end;

end;

 

o erro ocorre quando chega no qr1.prepare ou o qr1.preview

[Chrnos 30]

Você conferiu se não excluiu algum componente acidentalmente do relatório que poderia estar sendo usado em algum evento em runtime do report? Verificou se o componente que ele diz não encontrar existe no report?

[Lillyp 0]

Ele não diz qual o componente que está faltando... ele compila normalmente, mas quando aperta o botão pra imprimir aparece o erro

[Chrnos 30]

Neste caso, seria bom verificar todos os componentes para ver se eles existem no dfm e no pas, se as ligações estão corretas entre componentes e dataset, etc... pode ter alguma referência errada entre os dados do report e da consulta que só em runtime está aparecendo.

[Lillyp 0]

Descobri o erro

 

procedure TFDoadoresAptos.BtimprimirClick(Sender: TObject);

begin

with tfqrdoadoresaptos.create(application) do

begin

qdoadoresaptos.Active:=false;

qdoadoresaptos.DatabaseName:= DBNamePadrao.Database.DatabaseName;

//qdoadoresaptos.SQL

//qdoadoresaptos.ParamByName

qdoadoresaptos.Active:=true;

qr1.prepare;

qr1.Preview;

free;

end;

end;

 

Nesse código que eu mandei mesmo...ali consta que qdoadoresaptos.Active:=true;

Essa linha gerava o erro no qreport. Tirei ela e funcionou normalmente.

Obrigada a todos http://forum.imasters.com.br/public/style_emoticons/default/natal_happy.gif

[Chrnos 30]

Que bom que conseguiu encontrar o erro... e esse tipo de coisa acontece até aos mais experientes rs...

 

[]'s