Como imprimir el texto introducido en un memo

[[kurono]]

hola amigos del foro tengo un problema me gustaria imprimir en una hoja el texto que tengo en un memo si alguien sabe como hacerlo se lo agradeceria

[[BlueSteel]]

Hola kurono

te sugiero que leas la guia de estilo http://www.clubdelphi.com/foros/guiaestilo.php

ya que tu pregunta le falta complementar con:

En que delphi ? a través de que Reporteador ? (QReport / Rave / directo desde delphi / otro)

El dato lo tienes almacenado, o lo quieres imprimir en forma directa ??

[[kurono]]

disculpa es en delphi 7 y es directo desde delphi

[roman]

Si buscas en la ayuda de TPrinter|Using TPrinter, verás un ejemplo muy parecido a éste:

Código Delphi [-]
var
  J: Integer;

begin
  Printer.BeginDoc;
  Printer.Canvas.Font := Memo1.Font;

  for J := 0 to Memo1.Lines.Count - 1 do
    Printer.Canvas.TextOut(
      MARGIN_LEFT,
      MARGIN_TOP + J*Printer.Canvas.TextHeight(Memo1.Lines[J]),
      Memo1.Lines[J]
    );

  Printer.EndDoc;
end;

que imprime el contenido del memo con los márgenes dados y con la fuente que tenga el memo.

// Saludos

[[kurono]]

ok gracia roman