[[kuan-yiu]]

Revisa que tengan datos. Algo así:

Código Delphi [-]
While Not MOD.Tabla2.Eof do
Begin
   cod1:=MOD.Tabla2.fieldbyName('CODIGO').Value;
   nom:=MOD.Tabla2.fieldbyName('NOMBRE').Value;
// condicional que solo graba cuando tienes algo
   if (cod1<>'')and(nom<>'') then
     Insertar_Registro_Tabla_1('archivo', cod1, FCountRec, Sender);
   CFG.MOD.Tabla2.Next;
end;