On Mon, 04 December 2000, "Brad McClarren" wrote:
[...]
> : DDE-EXECUTE ( addr n -- )
> ( a n) CONV HITEM CF_TEXT XTYP_EXECUTE 5000 0 DdeClientTransaction
> DdeFreeDataHandle DROP ;
[...]
> Anybody have a pointer or two?
Try the following: ( just "1+" appended )
: DDE-EXECUTE ( addr n -- )
( a n) 1+ CONV HITEM CF_TEXT XTYP_EXECUTE 5000 0 DdeClientTransaction
DdeFreeDataHandle DROP ;
Regards,
Charles Melice
Received on Mon Dec 04 2000 - 14:28:20 PST
Subscribe to our e-mail list service. It's free for all SwiftForth and SwiftX users!
This archive was generated 07-Feb-2012. Archive updated nightly.