在此事件中处理
procedure TfrmTdmzTjRtp.QRLabel19Print(sender: TObject; var Value: String);
begin
  //参数value就是QRLabel19的值,你可以在此处理它的值
  如: 
    value :='你好';end;