Itamar,
The trick is detached locals: A function returns a codeblock for each n
FOR n:= 1 TO 100
@ x, y ......... ON CLICK FunDetached(oOwB, oHora, n)
NEXT
*
FUNCTION FunDetached(oOwB, oHora, n)
RETURN {|| MyFunc(oOwB, oHora, n) }
*
*
FUNCTION MyFunc(oOwB, oHora, n)
RETURN Mesa(oOwB, oHora, n)
Regards
Itamar Lins escribió en mensaje ...
>No, because oOwB change N times and Myfunc2 will return only the last.
>For example
>
>For n = 1 to 100
>...
> @ x,y OwnerButton &oMesa of oDlgMesas Text cAtende+'
>'+strzero(nCount,3) Coordinates 00,45,20,15 Size 60,60 ;
> ON CLICK {||mesa(&oOwB , oHora)} FLAT BITMAP cMesa TRANSPARENT
>COORDINATES 0,0,41,41
>...
>{||mesa(&oOwB)} //so it works well
>{||mesa(&oOwB,oHora)} //so it not works
>
>Next
>
>it should be changed at runtime!
>
>Regards,
>Itamar M. Lins Jr.
>
>"Antonio Martinez" <[email protected]>
>escreveu na mensagem news:[email protected]...
>> Itamar,
>>
>> do you like a workaround ?
>>
>> {|| MyFunc(oOwB, oObj) }
>>
>> FUNCTION MyFun(oOwB, oObj)
>> RETURN MyFunc2(&oOwB, oObj)
>>
>> Regards
>>
>>
>>
>> Itamar Lins escribió en mensaje ...
>>>Hi!
>>>how to resolve this is question?
>>>
>>>{||MyFunc(&oOwB , oObj)}
>>>
>>> Error E0047 Code block contains both macro and declared symbol
>> references.
>>>
>>>Best regards,
>>>Itamar M. Lins Jr.
_______________________________________________
Harbour-users mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour-users
