Painel de líderes

@Juliomar Marchetti Após esta alteração na unit ACBrPAF.pas. Os registros E estão sendo gravados duas vezes no arquivo. Devido a este código. Nesta situação, pode chamar duas vezes a função FPAF_E.WriteBuffer. if FPAF_E.RegistroE2.Count > 0 then begin FPAF_E.WriteRegistroE2(Layout); FPAF_E.WriteBuffer; end; if FPAF_E.RegistroE3.DT_EST > 0 then begin FPAF_E.WriteRegistroE3; FPAF_E.WriteBuffer; end; Alterei este pequeno bloco para: if FPAF_E.RegistroE2.Count > 0 then FPAF_E.WriteRegistroE2(Layout); if FPAF_E.RegistroE3.DT_EST > 0 then FPAF_E.WriteRegistroE3; if (FPAF_E.RegistroE2.Count > 0) or (FPAF_E.RegistroE3.DT_EST > 0) then FPAF_E.WriteBuffer; E resolveu.