LOCAL hWindow, hDC, cBuffer
hWindow = _screen.HWnd
hDC = GetWindowDC(hWindow)
cBuffer = REPLICATE(CHR(0), 24)
= GetWorldTransform(m.hDC, @cBuffer)
* display XFORM members
? "eM11=", float2int(buf2dword(SUBSTR(cBuffer,1,4)))
? "eM12=", float2int(buf2dword(SUBSTR(cBuffer,5,4)))
? "eM21=", float2int(buf2dword(SUBSTR(cBuffer,9,4)))
? "eM22=", float2int(buf2dword(SUBSTR(cBuffer,13,4)))
? "eDx=", float2int(buf2dword(SUBSTR(cBuffer,17,4)))
? "eDy=", float2int(buf2dword(SUBSTR(cBuffer,21,4)))
= ReleaseDC(hWindow, hDC)
|