DBCheckBox para Imprimir

[__cadetill]

Hilo movido de Conexión a Impresión


Si usas QR para imprimir, en el evento OnPrint del TQrDbText puedes hacer la comprovación necesaria para imprimir una X o lo que quieras (asignandole el valor al parámetro del evento)

[emeritos]

Me podrias poner un ejemplo, por favor.

Suponiendo que el campo es nombre_per y esta a True como se hace. en el OnPrint

[__cadetill]

No te voy a poner un ejemplo, así no aprenderías. Lo que sí haré es explicarte el funcionamiento del evento OnPrint

Veamos su definición

Código Delphi [-]
procedure TForm1.QRDBText1Print(sender: TObject; var Value: String);

Bien, según esto, el evento OnPrint recibe dos parámetros. El primero es el Sender, típico de todo evento (o casi todo). El segundo, que es el que nos interesa, es Value.

Si te fijas, es un parámetro de tipoo In/Out (por el var que le precede) y, Value contendrá lo que el QR va a imprimir en ese QrDbText.

A parte de esto, has de tener presente que, en todo momento puedes consultar el valor de un campo de la tabla de forma directa, es decir, puedes hacer algo como.....

Código Delphi [-]
Qr.Dataset.FieldByName('MiCampo').AsXXXX

donde AsXXX es el tipo de campo (AsInteger, AsBoolean, AsFloat, .....)

Resumiendo. Con lo segundo que te he dicho, puedes saber el valor de un determinado campo y, con lo primero, puedes modificar el valor de salida de lo que se va a imprimir en el QrDbText

Venga, que ya verás que es fácil

PD: ten en cuenta que Value es de tipo String (por eso de hacer conversiones si las necesitaras)