Imprimindo o conteudo de um memo

Vc terá que usar o QReport, para poder imprimir algum dado...

Faça com que o QRMemo, receba o dado, depois só mandar imprimir

T+

Você pode fazer assim para imprimir o conteúdo de um MEMO, primeiro declare na cláusula uses de seu programa a unit PRINTERS e use o seguinte:
procedure TForm1.Button1Click(Sender: TObject);
var
PrintFile: TextFile;
I: integer;
begin
Assignprn(PrintFile);
Rewrite(PrintFile);
Memo1.SelStart := 0;
try
Printer.Canvas.Font := Font;
for I := 0 to Memo1.Lines.Count - 1 do
writeLn(PrintFile, Memo1.Lines[I]);
finally
System.CloseFile(PrintFile);
end;
end;

Observe que eu usei no evento onclick de um Buttom mais vc pode utilizar a procedure de uma outra maneira que vc necessite.