hmgchang wrote:To make it work, change "ROUNDED FILLED" to "FILLED ROUNDED"
Thank you Mr. Chang for your reporting.
@ Rathi / Claudio, IMHO this could be solved by changing:
1. Changing "ROUNDED" differantiating as command in files:
- C:\hmg.3.3.0\INCLUDE\i_print.ch
C:\hmg.3.3.0\INCLUDE\hmg_hpdf.ch
Change this:
#xcommand @ <Row> , <Col> HPDFPRINT RECTANGLE TO <ToRow> , <ToCol> ;
[ <lwidth : PENWIDTH> <Width> ] ;
[ <lcolor : COLOR> <aColor> ] ;
[ <lfilled: FILLED> ] ;
ROUNDED ;
[ CURVE <nCurve> ] ;
=> ;
_HMG_HPDF_ROUNDRECTANGLE ( <Row> , <Col> , <ToRow> , <ToCol> , <Width> , <aColor>\[1\] , <aColor>\[2\] , <aColor>\[3\] , <.lwidth.> , <.lcolor.>, <.lfilled.>, <nCurve> )
For this one:
#xcommand @ <Row> , <Col> HPDFPRINT RECTANGLE ROUNDED TO <ToRow> , <ToCol> ;
[ <lwidth : PENWIDTH> <Width> ] ;
[ <lcolor : COLOR> <aColor> ] ;
[ <lfilled: FILLED> ];
[ CURVE <nCurve> ];
=> ;
_HMG_HPDF_ROUNDRECTANGLE ( <Row> , <Col> , <ToRow> , <ToCol> , <Width> , <aColor>\[1\] , <aColor>\[2\] , <aColor>\[3\] , <.lwidth.> , <.lcolor.>, <.lfilled.>, <nCurve> )
2. At sources app and demos examples:
@ 160,20 PRINT RECTANGLE
ROUNDED ;
TO 200,190 ;
PENWIDTH 0.1;
COLOR {255,255,0};
FILLED
We do not know if with this changing will bring many prejudices with retro-compatibility. Probably there is not much cases similar like this. Or just correct the DOC file.