Print problem
Publicado: Mar Mar 07, 2006 12:14 pm
Ignacio,
the code works:
WITH OBJECT Printer:oCanvas
:oFont:=oFont
:nMapMode:=mmHIMETRICS
ProcessMessages()
For nX:=1 TO LEN(a_nmbCm)
aPix[nX]:=:PointToPixels((a_nmbCm[nX,2]*100)+nLeft,;
(a_nmbCm[nX,1]*100)+nTop)
ProcessMessages()
next
:nMapMode:=mmPIXELS
END WITH
Without the both ProcessMessages() the reported error occurs.
With the calls it works!
Regards
Ingo
the code works:
WITH OBJECT Printer:oCanvas
:oFont:=oFont
:nMapMode:=mmHIMETRICS
ProcessMessages()
For nX:=1 TO LEN(a_nmbCm)
aPix[nX]:=:PointToPixels((a_nmbCm[nX,2]*100)+nLeft,;
(a_nmbCm[nX,1]*100)+nTop)
ProcessMessages()
next
:nMapMode:=mmPIXELS
END WITH
Without the both ProcessMessages() the reported error occurs.
With the calls it works!
Regards
Ingo