impresion de TstringGrid

[microbiano]

no tengo el reporte hecho no quise ahce nada sin saber como funciona, gracias por las respuestas.

[*Caro*]

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