361
Programming / Re: DragText & STDIN
« on: September 03, 2019, 03:37:06 pm »
If you need to use DT with rexx, I think you should use:
If RxFuncQuery('Sys2LoadFuncs') Then Do
Call RxFuncAdd 'Sys2LoadFuncs', 'RxUtilEx', 'Sys2LoadFuncs'
Call Sys2LoadFuncs
end
.....
rescu=res ' ' curline
rc=Sys2PutClipboardText(rescu,n)
say res "*-*" curline
If RxFuncQuery('Sys2LoadFuncs') Then Do
Call RxFuncAdd 'Sys2LoadFuncs', 'RxUtilEx', 'Sys2LoadFuncs'
Call Sys2LoadFuncs
end
.....
rescu=res ' ' curline
rc=Sys2PutClipboardText(rescu,n)
say res "*-*" curline