Hi,
the following error appairs now in the tsay class
in a non Themed App on Windows XP and always on all others OS.

===========
Path and name: K:\FWH\SAMPLES\TEST_EP.EXE (32 bits)
Size: 1,180,672 bytes
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 03/01/06, 09:19:41
Error description: Error BASE/1079 Argument error: .OR.
Args:
[ 1] = L .F.
[ 2] = U

Stack Calls

Called from: SAY.PRG => TSAY:ERASEBKGND(0)
Called from: WINDOW.PRG => TWINDOW:HANDLEEVENT(0)
Called from: CONTROL.PRG => TCONTROL:HANDLEEVENT(0)
Called from: SAY.PRG => TSAY:HANDLEEVENT(0)
Called from: WINDOW.PRG => _FWH(0)
Called from: => SHOWWINDOW(0)
Called from: WINDOW.PRG => TWINDOW:ACTIVATE(0)
Called from: RPREVIEW.PRG => RPREVIEW(0)
Called from: PRINTER.PRG => (b)TPRINTER:TPRINTER(0)
Called from: PRINTER.PRG => TPRINTER:PREVIEW(0)
Called from: PRINTER.PRG => PRINTEND(0)
Called from: test_ep.prg => MAIN(0)

This is a self-contained code that show this problem:

function Main()

local oPrn,I,nRowStep, oFont

PRINT oPrn NAME "Testing the new EP version" PREVIEW
oPrn:SetPortrait()

  DEFINE FONT oFont NAME "Ms Sans Serif" SIZE 0, -12 OF oPrn
  nRowStep:=oPrn:nVertRes()/60 && I want 60 lines

  PAGE
     for i:=1 to 60
        oPrn:Say( i,0,"This is the row no."+str(i,3))
    next
  ENDPAGE
  PAGE
     for i:=1 to 10
        oPrn:Say( i,0,"This is the row no."+str(i,3))
    next
  ENDPAGE

ENDPRINT

return nil

Any solution available ?

Thanks in advance.

Best Rgs,

Marco

Solved. Thanks a lot EMG.

Best Regards,

Marco