Cita:
Muchas gracias por todo lo comentado hasta ahora. Es que tengo que insertar en un quick report todos los items que haya en el listbox pero que sean en qrtext distintos. Por eso queria pasarlos a variables de texto y de ahi asignarlos a los qrtext ( En un quick report). Lo que me doy cuenta ahora es que puedo asignarlos desde los items.
Los items estan en un formulario y el quick report en otro. Es para hacer facturas y necesito poner los productos que compre en lineas total mente distintas se ve?
Bien el problema restante es que los items los voy agregando yo y a veces son 50 items o aveces 2 se ve??
Igualmente gracias por todo...
|
Hola, para hacer lo que pides, podrias usar algo como esto
Código Delphi
[-]
for i := 0 to Listbox1.Items.Count - 1 do
(formdelosreports.FindComponent('qrlabel'+inttostr(i)) as TQRLabel).Caption := Listbox1.Items[i];
suponiendo que los diferentes qrlabel ya existan en el momento de ejecución, si no deberias crearlos e ir colocandolos uno a uno. Ahora bien, el quick report tiene una banda, llamada detail band, que sirve precisamente para hacer lo que estas intentando hacer 'a mano', usando el evento OnNeedData y, si usas bases de datos, los QRDBText. Busca en el foro y en los propios ejemplos de Delphi y verás que te ahorras faena. Saludos.
PD: nada, repitiendo lo dicho por los colegas del club en esta segunda pagina de posts