IMPRESSÃO DE CHEQUES
Pessoal, alguém aqui ja fez impressão em cheque do banco Bradesco?
Estou realmente precisando de uma ajuda!
Estou realmente precisando de uma ajuda!
com Crystal Report vc consegue, so da trabalho posicionar corretamente os campos....
Impressão do cheque ou preenchimento?
Citação::
com Crystal Report vc consegue, so da trabalho posicionar corretamente os campos....
Crystal reports é pago né?
Citação::
Impressão do cheque ou preenchimento?
Cleverton, preenchimento.
Sabe aquele modelo de cheque contÃnuo que o banco passa, pra VC preencher automaticamente o cheque?
grátis e integrável ao VS
CARINHENA Usa o printDocument.
NICKSOFT
as versões Express e Community tem o Crhstal Integrado?
NICKSOFT
as versões Express e Community tem o Crhstal Integrado?
Galera, consegui! O cleverson, me deu uma mão!
O código fica mais ou menos assim (Se alguém precisar):
Valeu pela ajuda galera!
O código fica mais ou menos assim (Se alguém precisar):
Dim FonteMensagem As New Font([Ô]arial[Ô], 9, System.Drawing.GraphicsUnit.Point)
Private Sub PrintDocument1_PrintPage(sender As Object, e As Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
e.Graphics.PageUnit = GraphicsUnit.Millimeter
e.Graphics.DrawString([Ô]Um mil, quinhentos e vinte e seis[Ô], FonteMensagem, Brushes.Gray, 58, 13)
e.Graphics.DrawString([Ô]reais e 30 [Ô], FonteMensagem, Brushes.Gray, 35, 19)
e.Graphics.DrawString([Ô]Nome favorecido[Ô], FonteMensagem, Brushes.Gray, 37, 25)
e.Graphics.DrawString([Ô]Cidade[Ô], FonteMensagem, Brushes.Gray, 101, 32)
e.Graphics.DrawString([Ô]24[Ô], FonteMensagem, Brushes.Gray, 140, 32)
e.Graphics.DrawString([Ô]Mês[Ô], FonteMensagem, Brushes.Gray, 150, 32)
e.Graphics.DrawString([Ô]Ano[Ô], FonteMensagem, Brushes.Gray, 188, 32)
e.Graphics.Dispose()
e.HasMorePages = False
End Sub
Private Sub Imprimir()
PrintDialog.Document = PrintDocument1
If PrintDialog.ShowDialog() = DialogResult.OK Then
Me.PrintDocument1.Print()
End If
End Sub
Valeu pela ajuda galera!
Tópico encerrado , respostas não são mais permitidas