Quantcast
Channel: Visual COBOL - Forum - Recent Threads
Viewing all articles
Browse latest Browse all 4356

VC to NE

$
0
0

Hi,

Ive got the VC code below that I need to work in NetExpress which I presume will use x"91" can anyone advise how I need to code it?

The program EscapeSequence is written in C# or C++

declare pDC as type System.IntPtr = e::Graphics::GetHdc
set ws-string to w-st-unlock-settings
set escape-string-length to size of ws-string::TrimEnd(" ")
invoke type EscapeSequence.ClassCode::Print(pDC, xstart, ystart, ws-string, escape-string-length, w-align, ws-drawcolor, x-size1, xrotate, escape-font-style, escape-font-name);
invoke e::Graphics::ReleaseHdc(pDC)

 

Convert using :-

call x"91" using ????


Viewing all articles
Browse latest Browse all 4356

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>