The code may look like the following:

DECLARE INTEGER StartDoc IN gdi32 INTEGER hdc, STRING @lpdi

cDocInfo = Chr(20) + Repli(Chr(0), 19)

IF StartDoc(hPrnDC, @cDocInfo) > 0
	= StartPage(hPrnDC)
* ... printing with StretchDIBits or BitBlt ...
	= EndPage(hPrnDC)
	= EndDoc(hPrnDC)
ENDIF

Note that the pointer to DOCINFO is declared in StartDoc as a reference to string variable.

* * *
To get a printer's device context, use CreateDC or PrintDlg.