IMPRESSAO MODO PAISAGEM

WIRCAO 18/08/2011 09:34:37
#381947
Bom dia.
Coloquei esse código e consigo imprimir sem problemas em modo retrato, só que o flesgrid é muito grande e
por esse motivo preciso imprimir em modo paisagem, coloquei a linha: Printer.Orientation = vbPRORLandscape
e aparece o erro: Run-time error: [ô]396[ô]: [ô]Orientation property connot be set within a page[ô]

Dim intTamanho As Integer
intTamanho = FGrid1.Width
FGrid1.Width = Printer.Width
Printer.PaintPicture FGrid1.Picture, -120, 600
Printer.Orientation = vbPRORLandscape
Printer.EndDoc
FGrid1.Width = intTamanho
MsgBox [Ô]DADOS JÁ ENVIADOS PARA A IMPRESSORA.[Ô], , [Ô]IMPRESSÃO[Ô]
End Sub
MARCELO.TREZE 18/08/2011 12:52:37
#381969 Resposta escolhida
colega no caso do printer a ordem do fator altera o produto basta vc mudar a posição do orientation assim

Dim intTamanho As Integer
intTamanho = FGrid1.Width
FGrid1.Width = Printer.Width
Printer.Orientation = vbPRORLandscape[txt-color=#007100] [ô]coloquei antes do paintpicture[/txt-color]
Printer.PaintPicture FGrid1.Picture, -120, 600
Printer.EndDoc
FGrid1.Width = intTamanho
MsgBox [Ô]DADOS JÁ ENVIADOS PARA A IMPRESSORA.[Ô], , [Ô]IMPRESSÃO[Ô]
WIRCAO 18/08/2011 13:04:51
#381971
Coloque assim com você disse e apareceu o erro:

Run-time error [ô]380[ô]:
Invalid property value

Tem alguma referencia que preciso adicionar?
MARCELO.TREZE 18/08/2011 15:35:32
#381988
bom fiz um teste basico aqui e funcionou

será que a propriedade picture do flexgrid pode estar causando este erro

faça um teste com um picturebox antes
WIRCAO 18/08/2011 16:48:03
#382006
Acho que deve ser alguma referencia ou algum problema aqui no vb que utilizo,
pois ele não esta imprimindo nada na forma de paisagem, já no modo retrato
imprime normalmente, não consigo entender.
Estou tentando, quando conseguir eu posto no forum, desde já agradeço a ajuda.
MARCELO.TREZE 18/08/2011 18:19:07
#382022
o sp6 do vb6 está instalado?
Tópico encerrado , respostas não são mais permitidas
Voltar