try that. someone had given me that in UT and it works for me good for direct printing...

SET PRINTER TO myprinter.txt
SET PRINTER on
SET CONSOLE OFF
?"nfdgkfdjkgfk"
?"ncvmxvkcxvkc"
?"kvdjlgjkfsl"
SET PRINTER TO 
SET CONSOLE ON 
SET PRINTER off  

xfile="myprinter.txt"
xport="lpt1"
  STRTOFILE(CPCONVERT(CPCURRENT(1) ,CPCURRENT(2),FILETOSTR(m.xfile)),m.xfile)

DECLARE INTEGER CopyFile IN kernel32;
	STRING lpSrcFile, STRING lpDstFile, INTEGER bFail
CopyFile(m.xfile,m.xport, 0)

update: a class in UT download are more effective from that : "dirprtclass"