Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Como imprimir el texto introducido en un memo (https://www.clubdelphi.com/foros/showthread.php?t=46232)

kurono 26-07-2007 21:30:42

Como imprimir el texto introducido en un memo
 
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 26-07-2007 21:52:08

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 27-07-2007 05:14:35

disculpa es en delphi 7 y es directo desde delphi

roman 27-07-2007 07:30:46

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 29-07-2007 05:54:50

ok gracia roman


La franja horaria es GMT +2. Ahora son las 15:46:10.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi