Descrição:
Como posso imprimir uma tela?
Solução:
O exemplo a seguir ilustra como imprimir a tela corrente através do clique em um botão. Antes de tudo, é necessário criar um relatório formatado. Para isto, siga estes procedimentos:
- Acesse o Organizer (Alt+O) e selecione o item Relatórios.
- Clique em Novo e selecione Relatório Formatado.
- Com o Relatório (Form1) selecionado, clique em Editar.
- Insira um objeto Bitmap no relatório (Objetos->Bitmap) com a dimensão desejada.
- Feche a janela do relatório.
Logo após, é necessário configurar um botão para a impressão do relatório. Para isto, siga estes procedimentos:
- Insira um botão na tela que acesse suas propriedades através de um duplo clique.
- Acesse a aba Scripts e clique em Novo.
- Selecione o evento OnRelease e clique em Ok.
- Cole o script a seguir no evento criado:
CaptureScreen(“C:\teste.bmp”) //salva captura da tela em um arquivo no disco rígido
Bitmap1.bitmapName = “C:\teste.bmp” //configura o bitmap do relatório formatado com a figura da tela capturada
Form1.Print() //imprime tela
Bitmap1.bitmapName = “C:\teste.bmp” //configura o bitmap do relatório formatado com a figura da tela capturada
Form1.Print() //imprime tela
NOTA: A impressora utilizada pelo relatório é configurada no próprio relatório através de Organizer->Relatórios->Meu Relatório -> Impressora.
