Fórum SQL...problema na geração da consulta... #283586
01/06/2005
0
Tenho a seguinte sql e estou usando interbase :
with Qry1 do
begin
Qry1.Close;
sSQL := ´Select * from contrato´;
SQL.Clear;
SQL.Add(sSQL);
Qry1.Prepare;
Qry1.Open;
End;
QuickRep1.Prepare;
vPgs := QuickRep1.QRPrinter.PageCount;
if Application.MessageBox(´Enviar direto para Impressora?´,´Impressão´,mb_yesno+mb_iconquestion) = IDNO then
QuickRep1.Preview
else
QuickRep1.Print;
Qry1.Close;
quando executo a opção de preview ou printer ela me retorna o seguinte erro :
Control ´´ has no parent widget
so que não tenho nenhum campo de nome control ou qualquer componente com este nome tambel no quickrep1
algum ja passou por esta situação
Valeu
Cavalcanti.fabio
Curtir tópico
+ 0Posts
01/06/2005
Cavalcanti.fabio
Gostei + 0
08/06/2005
Cavalcanti.fabio
Gostei + 0
08/06/2005
Rjun
Gostei + 0
08/06/2005
Cavalcanti.fabio
valeu.
Gostei + 0
08/06/2005
Sandra
Um detalhezinho. Por que você fecha [b:9394f54b20]Qry1[/b:9394f54b20] duas vezes? :roll:
Aqui:
... QuickRep1.Preview else QuickRep1.Print; Qry1.Close; <= essa linha
Verifique se não é isso. :D
Atente-se também para o código que está escrevendo. Se está usando ´with´ (primeira linha da SQL), não há necessidade de escrevê-la novamente nas próximas. Assim (sem a linha que comentei acima):
with Qry1 do begin Close; sSQL := ´Select * from contrato´; Clear; Add(sSQL); Prepare; Open; end; QuickRep1.Prepare; vPgs := QuickRep1.QRPrinter.PageCount; if Application.MessageBox(´Enviar direto para Impressora?´, ´Impressão´, mb_yesno+mb_iconquestion) = IdNo then QuickRep1.Preview else QuickRep1.Print;
[b:9394f54b20]Obs.:[/b:9394f54b20] Procure também usar a tag [Code], pois facilita bastante a leitura do código postado.
Boa sorte! :D
Gostei + 0
09/06/2005
Cavalcanti.fabio
vou continuar tentando...caso alguem tenha mais alguma ideia será bem vinda.
grato
Gostei + 0
09/06/2005
Rjun
Gostei + 0
09/06/2005
Cavalcanti.fabio
vou continuar tentando...quem sabe acerto ou acertamos juntos.
grato
Gostei + 0
09/06/2005
Cavalcanti.fabio
Gostei + 0
09/06/2005
Gandalf.nho
Gostei + 0
16/06/2005
Cavalcanti.fabio
[O erro só ocorre nesse relatório ou em outros tb? Vc usa o preview padrão do QuickReport ou criou um custom?]
uso o preview e o printer e o erro acontece com este relatorio que estou criando e tentei recriar outro do zero e a sql dar o mesmo erro...
incrivel...mas aconteceu comigo.
valeu.
+ alguem para dar uma dica.
Gostei + 0
17/06/2005
Cavalcanti.fabio
mais alguem...
Gostei + 0
20/06/2005
Cavalcanti.fabio
alguem mais
Gostei + 0
05/07/2005
Cavalcanti.fabio
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)