Fórum Setup FortesReport #561861
04/09/2016
0
Preciso de uma impressão direta, alguém sabe como desabilitar a opção de setup antes da impressão?
Rafaela
Curtir tópico
+ 0
Responder
Posts
05/09/2016
Raimundo Pereira
if dm.Tabela.RecordCount=0 then
begin
ShowMessage('Acesso negado - Nenhum registro encontrado');
end
else
begin
if CBX_PRINTER.Items.Count>0 then
begin
rel.PrintOptions.Printer:=CBX_PRINTER.Text;
end
else
begin
rel.PrintOptions.Printer:='Default';
end;
REL.PrepareReport();
//REL.ShowReport();// Mostra o relatório
//rel.Print; //Imprime direto
end;
begin
ShowMessage('Acesso negado - Nenhum registro encontrado');
end
else
begin
if CBX_PRINTER.Items.Count>0 then
begin
rel.PrintOptions.Printer:=CBX_PRINTER.Text;
end
else
begin
rel.PrintOptions.Printer:='Default';
end;
REL.PrepareReport();
//REL.ShowReport();// Mostra o relatório
//rel.Print; //Imprime direto
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)