QReport y CheckBox

__cadetill · #2 01-09-2004

si se puede, y de hehco es fácil. Es un truquillo, pero funciona a las 1000 maravillas

- Te creas una imagen con un Check (un bis, o dilo como quieras)
- Pones en la banda Detail donde se ha de imprimir un TQRImage en el que cargarás dicha imagen
- en el BeforePrint de la banda haces:

Código Delphi [-]procedure TCalcComVFrm.QRBand1BeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
begin
  QrImage1.Enabled := QuickReport1.DataSet.FieldByName('campoBooleano').AsBoolean
end;

Espero te sirva