Moderator: Enrico Maria Giordano
PRNLANDSCAPE()
REPORT oRpt
PRNPORTRAIT()
ACTIVATE REPORT oRpt
IF ::lPrinter
// imposto la stampante!
PrinterSetup()
ENDIF
PrnLandscape()
REPORT oRpt PREVIEW TITLE ::cTitolo
IF ::nPrnOrien == 1
PrnPortrait()
MsgInfo( "Impostato Portrait" )
ELSE
PrnLandscape()
MsgInfo( "Impostato Landscape" )
// Anche quando passa di qui stampa orizzontale
ENDIF
Ugo wrote:
- Code: Select all Expand view RUN
PrnLandscape()
MsgInfo( "Impostato Landscape" )
// Anche quando passa di qui stampa orizzontale
ENDIF
EnricoMaria wrote:Come, appunto ti avevo detto.
EnricoMaria wrote:Comunque potrebbe dipendere anche dall'opzione oRpt:lAutoLand che fa stampare in orizzontale quando necessario e che è attivata di default
EnricoMaria wrote:Forse non hai una versione aggiornata di FWH? In quella che ho io (l'ultima) lo switch da portrait a landscape avviene automaticamente.
EnricoMaria wrote:No, direi di no. Allora deve funzionare così anche a te. Praticamente, se la stampa non entra in verticale allora la TReport passa automaticamente in orizzontale. Se poi non entra neanche in orizzontale allora ti dà il messaggio ma comunque stampa in orizzontale pur troncando il testo che non entra nel foglio.
Controlla che la variabile oRpt:lAutoLand non sia impostata a .F.
EnricoMaria wrote:Dovrebbe essere pari alla lunghezza di tante "B" quanti sono i caratteri del primo dato visualizzato. Potresti impostarlo in millimetri utilizzando il metodo Cmtr2Pix().
Return to All products support
Users browsing this forum: No registered users and 6 guests