Hi Petr,

Bingo! now works without a hitch.

I'll prepare a patch in a few minutes.

Brgds,
Viktor

On 2008.05.18., at 19:58, Petr Chornyj wrote:




Szakáts Viktor wrote:


One thing I've noticed is that the demo program actually
GPFs 3-4 times before exiting, and the output .pdf is not
created, so something is hiding in there still.



Hi Victor,
please, test it

HB_FUNC( HPDF_PAGE_GETCURRENTPOS )
{
/*
  HPDF_Point pt;
  PHB_ITEM info = hb_itemArrayNew( 2 );
  PHB_ITEM temp = hb_itemNew( NULL );

  HPDF_Page_GetCurrentPos2( (HPDF_Page) hb_parnl( 1 ), &pt );

  hb_arraySet( info, 1, hb_itemPutNL( temp, pt.x ) );
  hb_arraySet( info, 2, hb_itemPutNL( temp, pt.y ) );

  hb_itemRelease( temp );
  hb_itemReturnRelease( info );
  //hb_itemRelease( info );
*/

  HPDF_Point pt;
  PHB_ITEM info = hb_itemArrayNew( 2 );

  HPDF_Page_GetCurrentPos2( (HPDF_Page) hb_parnl( 1 ), &pt );

  hb_arraySetND( info, 1, pt.x );
  hb_arraySetND( info, 2, pt.y );

  hb_itemReturnRelease( info );
}

Regards,
Petr
--
View this message in context: 
http://www.nabble.com/2008-05-17-18%3A45-UTC%2B0800-Pritpal-Bedi-%28pritpal%40vouchcac.com%29-tp17298565p17305811.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to