Erro ao fazer o preview pela segunda vez.
Olá
No meu programa, quando concluí o cadastra e vou imprimir, imprime tudu certo, até aí tudo bem, mas quando vou imprimir o mesmo registro ou outro resgistro, ele dá como se não existisse o form de impressão.
estou usando da seguinte forma:
procedure TFTelaImpressao.SpeedButton2Click(Sender: TObject);
begin
FTelaImpressao.Close;
application.createform(tFRelatorioPedido,FRelatorioPedido);
FRelatorioPedido.Preview;
end;
Vlw por quem poder me ajudar!!!
No meu programa, quando concluí o cadastra e vou imprimir, imprime tudu certo, até aí tudo bem, mas quando vou imprimir o mesmo registro ou outro resgistro, ele dá como se não existisse o form de impressão.
estou usando da seguinte forma:
procedure TFTelaImpressao.SpeedButton2Click(Sender: TObject);
begin
FTelaImpressao.Close;
application.createform(tFRelatorioPedido,FRelatorioPedido);
FRelatorioPedido.Preview;
end;
Vlw por quem poder me ajudar!!!
Franck.c
Curtidas 0
Respostas
Rafael Heise
01/12/2003
Talvez porque cada vez você cria e não destroi, dai ele não consegue criar de novo. Ou talvez porque no outro procedimento você não criou. Veja o que você fez!
valeu
valeu
GOSTEI 0
Aroldo Zanela
01/12/2003
Colega,
Teste desta forma aqui:
Teste desta forma aqui:
procedure TFTelaImpressao.SpeedButton2Click(Sender: TObject); begin FTelaImpressao.Close; application.createform(tFRelatorioPedido,FRelatorioPedido); FRelatorioPedido.QuickRep1.PreviewModal; // Tem que ser modal FRelatorioPedido.Release; FreeAndNil(FRelatorioPedido); end;
GOSTEI 0