Now availiable on my web site is a routine for printing within a DBPro program, with full font control and line positioning.
The commands look like :
x=LSelectPrinter()
x=LStartNewPage()
x=LSendToPrint("This is a DBPro Print")
x=LSendToPrint("This is second line")
x=LSendToPrint("This is a third line",400,400)
LFontDetails "Arial",128,32,0,0,_
0,1,0,0,0,_
0,0,0,0
x=LSendToPrint("[000400,000400]This is a test of manual positioning")
x=LPrintPage()
x=LStartNewPage()
x=LSendToPrint("[000400,000400]This is a test of manual positioning")
x=LPrintPage()
x=LFinishPrinting()
print "Finished"
wait key