Xailer & OZ Software

I have some modules written in "C" and they take parameters. Please take
the following example and inform how to code it ?
::oEdit2:Value := XAROUTINE( val(::oEdit1:Value) )
#pragma BEGINDUMP
XA_FUNC( XAROUTINE )
{
int result;
result = MyRoutine( iAmount );
hb_reti( result );
}
#pragma ENDDUMP
TIA.
Regards,
David Fung

Got it
hb_param()..., Sorry for the trouble.
david fung wrote:
> I have some modules written in "C" and they take parameters. Please take
> the following example and inform how to code it ?
>
>
> ::oEdit2:Value := XAROUTINE( val(::oEdit1:Value) )
>
>
>
> #pragma BEGINDUMP
>
> XA_FUNC( XAROUTINE )
> {
> int result;
>
> result = MyRoutine( iAmount );
>
> hb_reti( result );
> }
>
> #pragma ENDDUMP
>
> TIA.
>
> Regards,
> David Fung

Got it
hb_param()..., Sorry for the trouble.
david fung wrote:
> I have some modules written in "C" and they take parameters. Please take
> the following example and inform how to code it ?
>
>
> ::oEdit2:Value := XAROUTINE( val(::oEdit1:Value) )
>
>
>
> #pragma BEGINDUMP
>
> XA_FUNC( XAROUTINE )
> {
> int result;
>
> result = MyRoutine( iAmount );
>
> hb_reti( result );
> }
>
> #pragma ENDDUMP
>
> TIA.
>
> Regards,
> David Fung

David,
Mayby will be helpful... In www.capelblog.com there are some articles that
explains in a easy way how to make 'C' functions for (x)Harbour. The
articles are in spanish but I think that translators can help you. Look for
'Aprender a restar','Aprender a sumar' and 'Aprender a multiplicar'
articles.
Regards,
José Luis Capel
"david fung" <davfung@yahoo.com> escribió en el mensaje
news:453dc163$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Got it
>
> hb_param()..., Sorry for the trouble.
>
>
> david fung wrote:
>> I have some modules written in "C" and they take parameters. Please take
>> the following example and inform how to code it ?
>>
>>
>> ::oEdit2:Value := XAROUTINE( val(::oEdit1:Value) )
>>
>>
>>
>> #pragma BEGINDUMP
>>
>> XA_FUNC( XAROUTINE )
>> {
>> int result;
>>
>> result = MyRoutine( iAmount );
>>
>> hb_reti( result );
>> }
>>
>> #pragma ENDDUMP
>>
>> TIA.
>>
>> Regards,
>> David Fung

David,
Mayby will be helpful... In www.capelblog.com there are some articles that
explains in a easy way how to make 'C' functions for (x)Harbour. The
articles are in spanish but I think that translators can help you. Look for
'Aprender a restar','Aprender a sumar' and 'Aprender a multiplicar'
articles.
Regards,
José Luis Capel
"david fung" <davfung@yahoo.com> escribió en el mensaje
news:453dc163$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Got it
>
> hb_param()..., Sorry for the trouble.
>
>
> david fung wrote:
>> I have some modules written in "C" and they take parameters. Please take
>> the following example and inform how to code it ?
>>
>>
>> ::oEdit2:Value := XAROUTINE( val(::oEdit1:Value) )
>>
>>
>>
>> #pragma BEGINDUMP
>>
>> XA_FUNC( XAROUTINE )
>> {
>> int result;
>>
>> result = MyRoutine( iAmount );
>>
>> hb_reti( result );
>> }
>>
>> #pragma ENDDUMP
>>
>> TIA.
>>
>> Regards,
>> David Fung

Thank you for the reference, any resource could be helpful.
So many questions to be asked. I'll take a look of them. I've been
searching the web and NG to find answers.
Few of my yesterday questions still outstanding ! I guess I just have to
wait a little longer.
Thanks.
David
José Luis Capel wrote:
> David,
>
> Mayby will be helpful... In www.capelblog.com there are some articles that
> explains in a easy way how to make 'C' functions for (x)Harbour. The
> articles are in spanish but I think that translators can help you. Look for
> 'Aprender a restar','Aprender a sumar' and 'Aprender a multiplicar'
> articles.
>
> Regards,
> José Luis Capel
>
> "david fung" <davfung@yahoo.com> escribió en el mensaje
> news:453dc163$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Got it
>>
>> hb_param()..., Sorry for the trouble.
>>
>>
>> david fung wrote:
>>> I have some modules written in "C" and they take parameters. Please take
>>> the following example and inform how to code it ?
>>>
>>>
>>> ::oEdit2:Value := XAROUTINE( val(::oEdit1:Value) )
>>>
>>>
>>>
>>> #pragma BEGINDUMP
>>>
>>> XA_FUNC( XAROUTINE )
>>> {
>>> int result;
>>>
>>> result = MyRoutine( iAmount );
>>>
>>> hb_reti( result );
>>> }
>>>
>>> #pragma ENDDUMP
>>>
>>> TIA.
>>>
>>> Regards,
>>> David Fung
>
>

Thank you for the reference, any resource could be helpful.
So many questions to be asked. I'll take a look of them. I've been
searching the web and NG to find answers.
Few of my yesterday questions still outstanding ! I guess I just have to
wait a little longer.
Thanks.
David
José Luis Capel wrote:
> David,
>
> Mayby will be helpful... In www.capelblog.com there are some articles that
> explains in a easy way how to make 'C' functions for (x)Harbour. The
> articles are in spanish but I think that translators can help you. Look for
> 'Aprender a restar','Aprender a sumar' and 'Aprender a multiplicar'
> articles.
>
> Regards,
> José Luis Capel
>
> "david fung" <davfung@yahoo.com> escribió en el mensaje
> news:453dc163$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Got it
>>
>> hb_param()..., Sorry for the trouble.
>>
>>
>> david fung wrote:
>>> I have some modules written in "C" and they take parameters. Please take
>>> the following example and inform how to code it ?
>>>
>>>
>>> ::oEdit2:Value := XAROUTINE( val(::oEdit1:Value) )
>>>
>>>
>>>
>>> #pragma BEGINDUMP
>>>
>>> XA_FUNC( XAROUTINE )
>>> {
>>> int result;
>>>
>>> result = MyRoutine( iAmount );
>>>
>>> hb_reti( result );
>>> }
>>>
>>> #pragma ENDDUMP
>>>
>>> TIA.
>>>
>>> Regards,
>>> David Fung
>
>