Experimente implementar o método ComandoDimensoes, na classe PPLA, ele foi introduzido, para EscLabel e é chamado em TACBrETQClass.ComandosIniciarEtiqueta
function TACBrETQEscLabel.ComandoDimensoes: AnsiString;
begin
Result := '';
if (Dimensoes.Largura > 0) then
AdicionarComandos('^S(CLS,P,' + IntToStr(ConverterUnidade(etqDots, Dimensoes.Largura)), Result);
if (Dimensoes.Altura > 0) then
AdicionarComandos('^S(CLS,L,'+IntToStr(ConverterUnidade(etqDots, Dimensoes.Altura)), Result);
if (Dimensoes.EspacoEntreEtiquetas > 0) then
AdicionarComandos('^S(CLS,C,'+IntToStr(ConverterUnidade(etqDots, Dimensoes.EspacoEntreEtiquetas)), Result);
if (Dimensoes.EspacoEsquerda > 0) then
AdicionarComandos('^S(CLS,G,'+IntToStr(ConverterUnidade(etqDots, Dimensoes.EspacoEsquerda)), Result);
end;