Just for fun I uploaded this old thing to the repo.
The magic is in \_classes\ce_BufferedGraphics.inc
. the example is \BitBlt\BitBlt.sln
(It is also mentioned on my old blog but the zip file is just an app and needs the Capesoft ObjectWriter to open it - https://www.clarionedge.com/clarion/examples/bitblt-clarion-example.html )