Mensaje    Asunto: No entiendo el error Responder citando

Estoy usando una código que me facilitó _Leo en ShowProgress en TStatusBar
Código:
if (Sender->QRPrinter->Client->ClassNameIs("TQRProgressForm"))
     Sender->QRPrinter->Client = fForBln; // El Form donde queremos recibir CM_QRPROGRESSUPDATE

en tres formularios que cada uno contiene un QR. Lo curioso es que en dos me funciona y en el otro me da un Access violation y ya no sé por donde pillarlo.
_________________
Un saludo

Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA)