Olá,
Cada bloco de etiquetas precisa ser iniciado e finalizado. Veja que vc colocou um "IniciarEtiqueta", mas após desenhar a linha(3 etiquetas) não informou o comando "FinalizarEtiqueta".
Talvez isso funcione:
FDMemEtiquetas.First;
while not FDMemEtiquetas.Eof do
begin
IniciarEtiqueta;
ImprimirTexto(orNormal, 1, 1, 2,15, 2, FDMemEtiquetasDESCRICAO.Value, 0, false);
ImprimirTexto(orNormal, 2, 1, 2, 2, 2, 'R$');
ImprimirTexto(orNormal, 2, 1, 2, 2, 6,FormatFloat('#0.00', FDMemEtiquetasPMC.value));
ImprimirTexto(orNormal, 1, 1, 2,10, 2,FDMemEtiquetasId_produto.Value, 0,false);
FDMemEtiquetas.Next;
if (not FDMemEtiquetas.Eof) then
begin
ImprimirTexto(orNormal, 1, 1, 2,15, 38, FDMemEtiquetasDESCRICAO.Value, 0, false);
ImprimirTexto(orNormal, 2, 1, 2, 2, 40, 'R$');
ImprimirTexto(orNormal, 2, 1, 2, 2, 42,FormatFloat('#0.00', FDMemEtiquetasPMC.value));
ImprimirTexto(orNormal, 1, 1, 2,10, 38,FDMemEtiquetasId_produto.Value, 0,false);
FDMemEtiquetas.Next;
end;
if (not FDMemEtiquetas.Eof) then
begin
ImprimirTexto(orNormal, 1, 1, 2,15,72, FDMemEtiquetasDESCRICAO.Value, 0, false);
ImprimirTexto(orNormal, 2, 1, 2, 2,74, 'R$');
ImprimirTexto(orNormal, 2, 1, 2, 2,79,FormatFloat('#0.00', FDMemEtiquetasPMC.value));
ImprimirTexto(orNormal, 1, 1, 2,10,72,FDMemEtiquetasId_produto.Value, 0,false);
FDMemEtiquetas.Next;
end;
FinalizarEtiqueta(1, 600);
end;
Imprimir(1, 600);
Desativar;