Código: Seleccionar todo
FullQRCode(
true, false,
clWhite,clBlack ,
PChar(StringCBBv3_3(QuitarGuionesRFC(RfcEmpresa),stRFC.Caption,stTotal.Caption,FE_FOLIOFISCAL_TIMBRE.Value,FacEURLCBB_FAC,FE_SELLODIGITAL.Value)),
LEVEL_M,
AUTO,
5,5,
150,150,
'c:\temporal\cbb.bmp')
);