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 20: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 20: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 04:14:35

disculpa es en delphi 7 y es directo desde delphi

roman 27-07-2007 06: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 04:54:50

ok gracia roman


La franja horaria es GMT +2. Ahora son las 06:04:39.

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