The latest preview do not work correctly on some page size. The problem is on startup the page are hidden one have to press the zoom/unzoom button to display it.
I am using 21.15 x 14.00
::oPrn:setsize(2150,1400)
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index Bugs report & fixes / Informe de errores y arreglos Preview error (fixed)
I confirm the problem (but I'm currently still using FWH 2.6) even with A4 page size. Sample:
EMG
#include "Fivewin.ch"
#include "Report.ch"
FUNCTION MAIN()
LOCAL oRpt
USE C:\XHARBOUR\TEST
REPORT oRpt PREVIEW
COLUMN TITLE "FIRST";
DATA FIELD -> first
COLUMN TITLE "LAST";
DATA FIELD -> last
COLUMN TITLE "STREET";
DATA FIELD -> street
COLUMN TITLE "CITY";
DATA FIELD -> city
END REPORT
ACTIVATE REPORT oRpt
CLOSE
RETURN NILEMG
Enrico,
I just modified USE C:\XHARBOUR\TEST into USE customer and executed your sample at FWH\samples directory and it worked ok.
I am using 800x600. What screen resolution do you use ? thanks,
Antonio,
If the screen resolution is greater than 1024 x 768 it show the problem.
Antonio Linares wrote:Enrico,
I just modified USE C:\XHARBOUR\TEST into USE customer and executed your sample at FWH\samples directory and it worked ok.
I am using 800x600. What screen resolution do you use ? thanks,
Can you try using xHarbour's TEST.DBF? Anyway, I'm using 1280 x 1024 as desktop resolution.
EMG
Enrico,
Ok, using 1280 x 1024 I get the error. We are going to review it asap.
Thank you!
EMG
Fixed. This change in needed in source\classes\rpreview.prg line 530:
oCoors1 := TRect():New( 40,;
Max( ( nWidth / 2 ) - nMetaWidth, 10 ),;
nHeight,;
Min( ( nWidth / 2 ) + nMetaWidth, nWidth - 20 ) )