Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   Imprimir.... Ayuda pleasee! (https://www.clubdelphi.com/foros/showthread.php?t=23663)

Rafe 25-07-2005 01:22:45

Imprimir.... Ayuda pleasee!
 
Hola que tal necesito imprimir el contenido que tengo almacenado en un listbox , como seria la manera mas sencilla ?? , no tengo idea de como se inprime , me podrian ayudar!! ???? gracias!!

dec 25-07-2005 08:42:30

Hola,

Ya planteaste la misma pregunta y Neftali te respondió. ¿Qué es lo que no tienes claro? ¿Podrías dar detalles sobre lo que estás intentando hacer y no te funciona?

Neftali [Germán.Estévez] 25-07-2005 09:43:27

Y por favor, no habrás otro hilo para el mismo tema; Continua con el que ya iniciaste...

Rafe 26-07-2005 02:41:02

imprimir...
 
Hola, disculpen por el hilo que abri innesesariamente, de los links que me dio , la verdad no entiendo mucho , es muy complejo , yo solo quiero apretar un boton y que imprima un par de lineas , q es el qreport?? , no hay alguna manera sencilla y rapida de imprimir algun listado almacenado en un listbox ?

Neftali [Germán.Estévez] 26-07-2005 11:53:43

Bueno, esos son sencillos... ;)
Algo más simple, podría ser ésto, sin usar ni QReport ni nada de nada...
Pon un TListBox con unos cuantos elementos y un botón. En el OnClick del botón escribe el siguiente código:

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
 var
   RE:TRichEdit;
 begin
   // Crear un control de RichEdit
   RE := TRichEdit.Create(Self);
   RE.Parent := Self;
   RE.Visible := False;
   // proteccion
   try
     // Asignar las líneas
     RE.PlainText := true;
     RE.Lines.AddStrings(listbox1.Items);
     // Imprimir
     RE.Print('Título del listado');
   finally
     // Liberar
     FreeAndNil(RE);
   end;
 end;

Añade al uses la unit ComCtrls.

Más simple que ésto... difícil (aunque un poco cutre tb...;))


La franja horaria es GMT +2. Ahora son las 01:26:36.

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