PROBLEMA COM PRINTPREVIEWCONTROL1
OLA GALERA
PRECISO DE AJUDA NESTE CASO, Jà MODIFIQUEI MEU PROCESSO DE PROGRAMAÇÃO MAIS ATé AINDA NADA... ACONTESCE QUE DECLAREI MINHAS VARIAVEIS PARA EXTRAIR OS DADOS DE PRENCHIMENTOS NO PrintPreviewControl1, MAIS ELE NAO ESTà CHAMADO AS REFERENCIAS.
TENHO O FORMULARIO 1 ONDE ESTÃO TODAS MINHAS REFERENCIAS E NO FORMULARIO 2 ONDE ESTà PARA VISUALIZAR AS INFORMAÇOES EXTRAIDAS DESDE O FORMULARIO 1 PARA IMPRIMIR. VEJAS OS PRINTS
ALGUMA IDEIA?
SEGUE MINHA SEQUENCIA.
FORM 1
BTN_VISUALIZAR
Dim visualForm As New frm_visualizar
visualForm.T_servico = cbo_tiposerv.Text
visualForm.servico = cbo_serviço.Text
frm_visualizar.Show()
FORUMLARIO 2
Public T_servico As String
Public servico As String
Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
[ô]declaramos os titulos do documento
e.Graphics.DrawString([Ô]ARIMUYA[Ô], New Font([Ô]Consolas[Ô], 56, FontStyle.Underline), Brushes.Black, 250, 50)
e.Graphics.DrawString([Ô]Consultoria & Serviços de T.I.[Ô], New Font([Ô]Times New Roman[Ô], 30, FontStyle.Underline), Brushes.Blue, 170, 130)
e.Graphics.DrawString([Ô]Orçamento Simulado[Ô], New Font([Ô]Arial[Ô], 26, FontStyle.Regular, GraphicsUnit.Display = GraphicsUnit.World), Brushes.Black, 180, 200)
[ô]declaramos as codiçoes de cada campo
e.Graphics.DrawString([Ô]Tipo de Serviço: [Ô], New Font([Ô]arial[Ô], 20, FontStyle.Regular), Brushes.Black, 50, 250)
e.Graphics.DrawString(T_servico, New Font([Ô]arial[Ô], 20, FontStyle.Regular), Brushes.Black, 170, 250)
[ô] e.Graphics.DrawString([Ô]Ordem do Serviço : [Ô], New Font([Ô]arial[Ô], 20, FontStyle.Regular), Brushes.Black, 50, 300)
[ô]e.Graphics.DrawString(servico, New Font([Ô]arial[Ô], 20, FontStyle.Regular), Brushes.Black, 170, 250)
End Sub
Alguma ideia?
PRECISO DE AJUDA NESTE CASO, Jà MODIFIQUEI MEU PROCESSO DE PROGRAMAÇÃO MAIS ATé AINDA NADA... ACONTESCE QUE DECLAREI MINHAS VARIAVEIS PARA EXTRAIR OS DADOS DE PRENCHIMENTOS NO PrintPreviewControl1, MAIS ELE NAO ESTà CHAMADO AS REFERENCIAS.
TENHO O FORMULARIO 1 ONDE ESTÃO TODAS MINHAS REFERENCIAS E NO FORMULARIO 2 ONDE ESTà PARA VISUALIZAR AS INFORMAÇOES EXTRAIDAS DESDE O FORMULARIO 1 PARA IMPRIMIR. VEJAS OS PRINTS
ALGUMA IDEIA?
SEGUE MINHA SEQUENCIA.
FORM 1
BTN_VISUALIZAR
Dim visualForm As New frm_visualizar
visualForm.T_servico = cbo_tiposerv.Text
visualForm.servico = cbo_serviço.Text
frm_visualizar.Show()
FORUMLARIO 2
Public T_servico As String
Public servico As String
Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
[ô]declaramos os titulos do documento
e.Graphics.DrawString([Ô]ARIMUYA[Ô], New Font([Ô]Consolas[Ô], 56, FontStyle.Underline), Brushes.Black, 250, 50)
e.Graphics.DrawString([Ô]Consultoria & Serviços de T.I.[Ô], New Font([Ô]Times New Roman[Ô], 30, FontStyle.Underline), Brushes.Blue, 170, 130)
e.Graphics.DrawString([Ô]Orçamento Simulado[Ô], New Font([Ô]Arial[Ô], 26, FontStyle.Regular, GraphicsUnit.Display = GraphicsUnit.World), Brushes.Black, 180, 200)
[ô]declaramos as codiçoes de cada campo
e.Graphics.DrawString([Ô]Tipo de Serviço: [Ô], New Font([Ô]arial[Ô], 20, FontStyle.Regular), Brushes.Black, 50, 250)
e.Graphics.DrawString(T_servico, New Font([Ô]arial[Ô], 20, FontStyle.Regular), Brushes.Black, 170, 250)
[ô] e.Graphics.DrawString([Ô]Ordem do Serviço : [Ô], New Font([Ô]arial[Ô], 20, FontStyle.Regular), Brushes.Black, 50, 300)
[ô]e.Graphics.DrawString(servico, New Font([Ô]arial[Ô], 20, FontStyle.Regular), Brushes.Black, 170, 250)
End Sub
Alguma ideia?
neste segundo nao aparece as informações prenchidas
ARIMUYA,
Dúvida:
- Você passou preenchidas para o formulário 2 as variáveis: [Ô]T_servico[Ô] e [Ô]servico[Ô]?
Veja mais:
Propriedade PrintPreviewControl.Document
http://msdn.microsoft.com/pt-br/library/system.windows.forms.printpreviewcontrol.document%28v=vs.110%29.aspx
[][ô]s,
Tunusat.
Dúvida:
- Você passou preenchidas para o formulário 2 as variáveis: [Ô]T_servico[Ô] e [Ô]servico[Ô]?
Veja mais:
Propriedade PrintPreviewControl.Document
http://msdn.microsoft.com/pt-br/library/system.windows.forms.printpreviewcontrol.document%28v=vs.110%29.aspx
[][ô]s,
Tunusat.
como vc consegue ver
os campos que devem ser preenchidas sao os combobox no form1, so que no form2 ele está declarado para receber...o titulo prenche automatico
os campos que devem ser preenchidas sao os combobox no form1, so que no form2 ele está declarado para receber...o titulo prenche automatico
ARIMUYA, você precisa de 2 forms pra quê? se voce já tem as informações em um só.
Suas variaveis estão vazias, pois voce declara as variaveis novamente ao abrir o form, declare essas variaveis num modulo ou use o valor que está nos combos.
Suas variaveis estão vazias, pois voce declara as variaveis novamente ao abrir o form, declare essas variaveis num modulo ou use o valor que está nos combos.
Tópico encerrado , respostas não são mais permitidas