Ola, gostaria de agradecer o Fabiofranzini, pelo trabalho de atualização do RaveCB, para o Trunk2, instalei o pacote e está funcionando corretamente, apenas a linha de (quantidade/especie/marca/numero/peso bruto/peso liquido) para a Danfe Paisagem não esta na posição correta.
Abri o ACBrDANFeCBRavePaisagem.pas para correção, mas não entendo a Lógica, Alguma sugestão????
code:
Box([fsTop],PosX,YPos,41,aHeigthPadrao+aIncHeigth,'Quantidade',IntToStr(Transp.Vol.Items.qVol),taRightJustify); //else // Box([fsTop],PosX,YPos,41,aHeigthPadrao+aIncHeigth,'Quantidade','',taRightJustify); Box([fsTop,fsLeft],XPos,YPos,43,aHeigthPadrao+aIncHeigth,'Espécie',Transp.Vol.Items.esp,taCenter); Box([fsTop,fsLeft],XPos,YPos,44,aHeigthPadrao+aIncHeigth,'Marca',Transp.Vol.Items.marca,taCenter); Box([fsTop,fsLeft],XPos,YPos,41,aHeigthPadrao+aIncHeigth,'Numero',Transp.Vol.Items.nVol,taCenter); //if (Transp.Vol.Items.pesoB <> 0) then Box([fsTop,fsLeft],XPos,YPos,41,aHeigthPadrao+aIncHeigth,'Peso Bruto', FormatFloatBr(Transp.Vol.Items.PesoB, '###,###,###,##0.000'),taRightJustify,True); //else // Box([fsTop,fsLeft],XPos,YPos,41,aHeigthPadrao+aIncHeigth,'Peso Bruto','',taRightJustify); //if (Transp.Vol.Items.pesoL <> 0) then Box([fsTop,fsLeft],XPos,YPos,41,aHeigthPadrao+aIncHeigth,'Peso Líquido',FormatFloatBr(Transp.Vol.Items.pesoL,'###,###,###,##0.000'),taRightJustify,True); //else // Box([fsTop,fsLeft],XPos,YPos,41,aHeigthPadrao+aIncHeigth,'Peso Líquido','',taRightJustify,True);
Abraçosssss