Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
...
| Pagetitle |
|---|
...
|
|
...
|
Cria
...
um
...
objeto
...
que
...
permite
...
visualizar
...
um
...
arquivo
...
no
...
formato
...
gerado
...
pelo
...
spool
...
de
...
impressão.
Hierarquia
...
...
- TPageView
Construtores
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
Propriedades
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
Métodos
| Inclusão de trecho | ||||||
|---|---|---|---|---|---|---|
|
Exemplos
| Bloco de código | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
#include "TOTVS.CH"
User Function TPageView()
Local cAcesso := Repl(" ",10)
DEFINE DIALOG oDlg TITLE "Exemplo TPageView" FROM 180,180 TO 550,700 PIXEL
oPrinter := TMsPrinter():New()
oPrinter:SetFile( NewMétodo construtor da classe.TPageView(): New ( [ nCol], [ nRow], [ nWidth], [ nHeigth], [ oPrinter], [ oWnd], [ nPageWidth], [ nPageHeight] ) --> oObjeto
oObjeto
oTPageView := TPageView():New( 0,0,510,354,oPrinter,oDlg,550,550 )PageSizeDefine o tamanho da página.TPageView(): PageSize ( [ nLargura], [ nAltura] ) -->
oTPageView:PageSize(1000,1000)Exemplo do método PageSize PrintPageImprime uma determinada página.TPageView(): PrintPage ( [ nNrPagina] ) -->
oTPageView:PrintPage(1)ResetRedimensiona a área de visualização.TPageView(): Reset ( < nPageWidth>, < nPageHeight> ) -->
oTPageView:Reset(400,400)Exemplo do método Reset  GetNumHighlightsRetorna o número de highlights por página.TPageView(): GetNumHighlights() --> aHighlights
aHighlights
oTPageView:cHighlight := "A"aHighlights := oTPageView:GetNumHighlights()
#include "TOTVS.CH" User Function TPageView() Local cAcesso := Repl(" ",10) DEFINE DIALOG oDlg TITLE "Exemplo TPageView" FROM 180,180 TO 550,700 PIXELoPrinter := TMsPrinter():New() oPrinter:SetFile( '\SPOOL\matr010.prt', .F.) oTPageView := TPageView():New( 0,0,510,354,oPrinter,oDlg,550,550 ) oTPageView:Show() oTPageView:nZoom := 150 ACTIVATE DIALOG oDlg CENTERED Return PreviewExemplo da classe TPageView |
Resultado do Exemplo
Abrangência
Microsiga Protheus 8.11 , Protheus 10
Classe disponível, para o TOTVS Application Server e TOTVS SmartClient, a partir da build 7.00.080806P.
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas