>Have a look at Raw Print VCX Download #9556
>It worked perfectly for me.
>Regards
>Kevin

Kevin:

I tried it and have one problem:

SET PRINTER TO NAME 'Star TSP643 Raster Printer'
      Set Classlib TO "C:\VFP Utilities\RawprintVcx\RawPrint" Additive
      oPrnDev = CreateObject("PrintDev")
      oPrnDev.cPrinterName = set('printer', 3)
      oPrnDev.cDocName = "Document from Memory var"

      If oPrnDev.oOPen()
      	Mvar1 = 'cat' 
         oPrnDev.oPrintMem(MVar1)
         Mvar1 = 'dog' 
         oPrnDev.oPrintMem(MVar1)
         mvar1 =  CHR(27)  + CHR(100) + '00'
         oPrnDev.oPrintMem(MVar1)
         oPrnDev.oClose()
      Else
         * Error opening device; display error number
         MessageBox("OpenPrinter() Error: "+str(oPrnDev.nOpenError))
      ENDIF

The command

mvar1 =  CHR(27)  + CHR(100) + '00'

cuts the paper, but it cuts the paper BEFORE printing 'cat' and 'dog'!