[Lazarus-es] cargar datos a un Memo en un reporte

Jesus Reyes jesusrmx en yahoo.com.mx
Jue Oct 1 23:43:17 CEST 2015


Hola Héctor, 

Sin tanto código, la forma mas fácil de hacer esto es poniendo una variable en memo2, por ejemplo: [vMemo2],
Si el texto que se carga de fichero.txt no va a ser modificado antes de mostrarlo en el reporte, lo mas fácil sera con un TStringlist, por ejemplo:

var
  L: TStringList;
...
...


begin
  ...
  L := TStringList.Create;
  L.LoadFromFile('ruta/a/fichero.txt');
  frVariables['vMemo2'] := L.Text;
  L.Free;
 ...
  theReport.ShowReport; 

No lo he probado, pero debería funcionar :)

Saludos!

Jesus Reyes A.


--------------------------------------------
El jue 1-oct-15, Héctor Fiandor <hfiandor en ceniai.inf.cu> escribió:

 Asunto: [Lazarus-es] cargar datos a un Memo en un reporte
 A: "Spanish version of Lazarus List" <lazarus-es en lists.lazarus.freepascal.org>
 Fecha: jueves, 1 de octubre de 2015, 11:55
 
 
 
 
  
  
 
 
 
 
 
 
 
 
 
 
 Buenos días: 
 
    
 
 Tengo un reporte
 factura_2.lrf que tiene un rectángulo Memo2,
 con información que pudiera variar en algún momento. 
 
    
 
 Tengo un fichero txt con
 dicha información, que leo y guardo
 en un Record (8 lineas). 
 
    
 
 Cuando la aplicación
 comienza, debe leer el fichero txt, y
 después debe cargar el Memo2 con las 8 líneas leidas
 (pienso que de forma
 similar como se carga un combobox). 
 
    
 
 Esto último es lo que no
 sé hacer (entre otras muchas cosas):
 cargar el Memo2 del factura_2.lrf. 
 
    
 
 Si me pueden ayudar con un
 pedazo de código se los voy a
 agradecer. En los tutoriales que tengo no lo vi claro. 
 
    
 
 Ing.
 Héctor Fiandor 
 
 hfiandor en ceniai.inf.cu 
 
 
   
 
 
 
 
 
 
 -----Sigue archivo adjunto-----
 
 _______________________________________________
 Lazarus-es mailing list
 Lazarus-es en lists.lazarus.freepascal.org
 http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es




More information about the Lazarus-es mailing list