Printing OpenGL images is not directly supported. However, it is possible to get reasonably good printing of OpenGL images by creating a bitmap RC, drawing to the bitmap, and then printing the bitmap. If the bitmap is not stretched to much to fit the printing area the quality of the printed image is good.
The steps are as follows:
1. create temporary form and isigraph control
2. create a bitmap RC
3. size image - the size handler, but with bitmap size, not glqwh''
4. draw image - the paint handler
5. save the bitmap to file
Something like the following could be used to print an OpenGL image drawn on form a in isigraph control.
print=: verb define wd 'pc p;cc g isigraph ws_clipchildren ws_clipsiblings;' BMPSIZE=.2$1000 NB. big bitmap for little stretch glaRC 1,BMPSIZE NB. do initialization required by size and paint size BMPSIZE NB. a_g_size calls size with glqwh'' a_g_paint'' glaSaveBMP 't.bmp' wd'pclose' NB. print t.bmp file with 2D printing )