ho ricominciato a riusare le librerie fivewin, ma mi succede una cosa strana con la creazione stampe:
uso questa istruzione:
PRINT oPrn NAME "Clienti 30 60 90" PREVIEW
DEFINE FONT oFont NAME "Courier new" SIZE 0, -8 OF oPrn
oPrn:SetLandscape()
e poi apro le varie pagine con PAGE e la finisco con ENDPAGE
ma il problema è che su 32 pagine le prime due sono bianche e le altre sono normali stampandomi però dalla pagina 3, per ovviare a questo metto le seguenti istruzioni
PAGE
ENDPAGE
PAGE
ENDPAGE
e così la stampa inizia si con due pagine bianche ma alla terza finalmente mi esce la pagina 1....

perchè?

Fammi vedere un piccolo ma compilabile esempio del problema così lo provo qui e ti dico se lo fa anche a me. Comunque mi sento di escludere a priori che ci sia un problema del genere nelle Fivewin.

EMG

ok, per esempio questo foglio mi esce in bianco

include "FiveWin.ch"

FUNCTION stclient()
local oPrn, oFont
local nRowStep, nColStep
local nRow := 0
local nCol := 0
local oPen1 := 0
local m_pagina := 0
DEFINE PEN oPen1 WIDTH 1 COLOR CLR_BLACK

PRINT oPrn NAME "Clienti" PREVIEW
DEFINE FONT oFont NAME "Courier new" SIZE 0, -8 OF oPrn

oPrn:SetLandscape()

nRowStep = oPrn:nVertRes() / 56 // 56 righe
nColStep = oPrn:nHorzRes() / 190 // 170 colonne

PAGE
nRow += nRowStep * 1
oPrn:Say(nRow,nColStep1,"PROVA",oFont)
nRow += nRowStep * 1
oPrn:Say(nRow,nColStep01,"CONTO",oFont)
nRow += nRowStep * 1
oPrn:Line(nRow,nColStep0,nRow,nColStep190,oPen1)

ENDPAGE
ENDPRINT
oFont:End()
oPen1:End()
RETURN NIL

A me esce un unico foglio in anteprima con scritto

PROVA
CONTO

e una lunga linea.

Vuoi il mio EXE per verificare?

EMG

no, mi fido....
a sto punto quale potrebbe essere l'errore?

io compilo con clipper 5.2e
e blinker

se aggindo queste istruzioni
-----------
PAGE
nRow += nRowStep * 1
oPrn:Say(nRow,nColStep1,"PROVA",oFont)
nRow += nRowStep * 1
oPrn:Say(nRow,nColStep01,"CONTO",oFont)
nRow += nRowStep * 1
oPrn:Line(nRow,nColStep0,nRow,nColStep*190,oPen1)

ENDPAGE
PAGE
nRow += nRowStep * 1
oPrn:Say(nRow,nColStep1,"PROVA",oFont)
nRow += nRowStep * 1
oPrn:Say(nRow,nColStep01,"CONTO",oFont)
nRow += nRowStep * 1
oPrn:Line(nRow,nColStep0,nRow,nColStep190,oPen1)

ENDPAGE
PAGE
nRow += nRowStep * 1
oPrn:Say(nRow,nColStep1,"PROVA",oFont)
nRow += nRowStep * 1
oPrn:Say(nRow,nColStep01,"CONTO",oFont)
nRow += nRowStep * 1
oPrn:Line(nRow,nColStep0,nRow,nColStep190,oPen1)

ENDPAGE

cioe aggiungendo tre volte altre gli stessi comandi di stampa, mi stampa dalla seconda pagina

Ah, be', io l'ho provato con FWH e xHarbour ultime versioni. Purtroppo non ho modo di verificare che non ci siano stati dei problemi in qualche momento della storia delle Fivewin.

EMG

ho anch'io FWH e xharbour, ma per non incappare in cose che non conosco non lo sto utilizzando....
la conversione da FW 192 a FWH e xharbour è poco traumatica ?