My code is something like this:

In the Click procedure of a Print command button:
GET PRINTER()
SET PRINTER ON
SET ALTERNATE TO a text file
I create the report using
? 'THIS IS MY REPORT'
?
? 'THAT'S AN EXAMPLE'

Then,

In the Valid procedure of a Print command button:
CREATE CURSOR TEXTFILE(filename c(60),mem m)

and then APPEND MEMO mem FROM report.txt

EJECT PAGE

SET PRINTER OFF