Page 1 of 1
Preview error (fixed)
Posted: Thu Nov 24, 2005 4:19 am
by Johnny Yiu
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)
Re: Preview error
Posted: Thu Nov 24, 2005 7:30 am
by Enrico Maria Giordano
I confirm the problem (but I'm currently still using FWH 2.6) even with A4 page size. Sample:
Code: Select all
#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 NIL
EMG
Posted: Thu Nov 24, 2005 7:40 am
by Antonio Linares
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,
Posted: Thu Nov 24, 2005 8:59 am
by Johnny Yiu
Antonio,
If the screen resolution is greater than 1024 x 768 it show the problem.
Posted: Thu Nov 24, 2005 1:21 pm
by Enrico Maria Giordano
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
Posted: Thu Nov 24, 2005 5:39 pm
by Antonio Linares
Enrico,
Ok, using 1280 x 1024 I get the error. We are going to review it asap.
Posted: Thu Nov 24, 2005 5:49 pm
by Enrico Maria Giordano
Thank you!
EMG
Posted: Sat Nov 26, 2005 6:12 am
by Antonio Linares
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 ) )