[[duilioisola]]

Deberías entonces mirar primero si contiene un valor.

Código Delphi [-]
if Item[j].NodeName = 'ean' then
begin
  // Primero verifico si hay datos
  if (Item[j].FirstChild.HasChildNode) then
    t_EAN := Item[j].FirstChild.NodeValue
  else
    t_EAN := 'XXXXXXXXXXXXX';
end;