Here's a quick Grid print preview demo, mostly from the Grid manual.  When I use the new xPrintOptions property, most of the row and column header cells appear correctly, but the upper-left header cell is misplaced!  A picture is attached.

ppbug;m;w;s;z;k;Œwself
© When print preview form appears, note missing upper-left header cell
© Scroll down to find it
© 12 Oct 2006  Rex Swain, Independent Consultant, www.rexswain.com

Œwself„'fm' Œwi 'Create' 'Form' ('where' 4 10)
   Œwi 'caption' 'Form with Grid'

   Œwself„'.grid' Œwi 'Create' 'APL.Grid'
      Œ„'APL version ',•Œsysver
      Œ„'Grid version ',•Œwi 'XGridVersion'
      Œwi 'xRows' 100
      Œwi 'xCols'  50
      Œwi 'xValue' ¯1 ¯1 'Bug'
      Œwi 'xValue' ¯1  1 (  1 50½¼  50)
      Œwi 'xValue'  1 ¯1 (100  1½¼ 100)
      Œwi 'xValue'  1  1 (100 50½¼5000)

Œwself„'printer' Œwi 'Create' 'Printer'
   Œwi 'scale' 3
   Œwi 'margin' 72 72 72 72

Œwself„'fm.grid'
   Œwi 'xPrinter' 'printer'
   Œwi 'xPrintZoom' 2
   Œwi 'xPrintOptions' 3  © header rows and cols
   k„Œwi 'xPrintInit' 0 1 1 10 5  © just a few cells

Œwself„'pre' Œwi 'Create' 'Form' ('where' 6 20)
   Œwi 'caption' 'Print Preview'
   Œwi 'scale' 5
   Œwself„'.pic' Œwi 'Create' 'Picture'
      Œwi 'where' (0 0,'..' Œwi 'size')
      Œwi 'style' 16 64
      Œwi 'border' 0
      Œwi 'scale' 5
m„10
w„('pre.pic' Œwi 'size')[2]-m×2
s„'fm.grid' Œwi 'PrintMetrics' 'size'
z„w÷s[2]
'pre.pic' Œwi 'imagesize' (m+m+z×s)
'fm.grid' Œwi 'PrintWindow' ('pre.pic' Œwi 'hdc'),m,m,z×s
'fm.grid' Œwi 'PrintPage' ¯2
'fm.grid' Œwi 'PrintPage' 1
'pre.pic' Œwi 'Paint'

k„'pre' Œwi 'Wait'