Cita:
Empezado por microbiano
no tengo el reporte hecho no quise ahce nada sin saber como funciona
|
Hola microbiano, para que te funcione el codigo necesitas crearte un reporte con QuickReport tal como te dice Neftali, una bada detalle y dentro de ella 3 QrLabels, donde cada QrLabel sera una columna de tu StringGrid.
La variable ItemIndex debes inicializarlo en el evento OnBeforePrint del QuickReport.
Y en el evento OnNeedData de tu reporte colocas el codigo que tienes, haciendo este cambio para recuperar los valores de tus 3 columnas y no solo la primera.
Código Delphi
[-]
....................................
QRLabel1.Caption := STgrid.Cells[0,ItemIndex];
QRLabel2.Caption := STgrid.Cells[1,ItemIndex];
QRLabel3.Caption := STgrid.Cells[2,ItemIndex];
....................................
Saluditos