> I have the following pending bugs (that I'm unable to fix, sorry):
>
>
> 1. (not so important)
>
> FUNCTION MAIN()
>
>     LOCAL oExcel := CREATEOBJECT( "Excel.Application" )
>
>     LOCAL cXls := "e:\xharbour\test.xls"
>
> //    oExcel:WorkBooks:Open( cXls, , , 1, , , , 1, , , .T., , .T. )
>     oExcel:WorkBooks:Open( cXls, , , , , , , , , , .T., , .T. )
>
>     oExcel:Visible = .T.
>
>     RETURN NIL

The correct way to pass a default argument to OLE Servers is using  
OleDefaultArg() function or OLE_DEFAULT_ARG macro. Please try:

       oExcel:WorkBooks:Open( cXls, , , OleDefaultArg(), , , ,  
OleDefaultArg(), , , .T., , .T. )

> 2.
>
> FUNCTION MAIN()
>
>     LOCAL cExp := "if a()"
>
>     &( cExp )
>
>     RETURN NIL

Phil, this my be related to string release in macro.y - can you  
please review?

Ron

-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft 
Defy all challenges. Microsoft(R) Visual Studio 2008. 
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers

Reply via email to