There is a Multiplatform way to do it?

func test(x_cmd)
  x_cmd=curdrive()+":\"+curdir(curdrive())+"\mytest.pdf"
  SHELLEXECUTE( 0, "OPEN" ,ALLTRIM(X_CMD))
  RETURN  .T.

 #pragma BEGINDUMP
 #include "windows.h"
 #include "hbapi.h"
 HB_FUNC( SHELLEXECUTE )
{
    hb_retnl( ( LONG ) ShellExecute( ( HWND ) hb_parnl( 1 ), hb_parc( 2
), hb_parc( 3 ), hb_parc( 4 ), hb_parc( 5 ), hb_parni( 6 ) ) );
}
#pragma ENDDUMP

-- 
Massimo Belgrano
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to