[statistik]

Написал следующий код.... не работает...
Выходит ошибка: project2.exe rased exeption class EAccessViolation with message ...и т.д.

Код:

procedure TForm1.Button1Click(Sender: TObject);
  var
  atrShifr:string;
  XMLDoc: IXMLDomDocument;
  r: IXMLDOMElement;
  begin
  XMLDoc:=CoDomDocument.Create;
  XMLDoc.LoadXML('c:\pro\608014004001_03312088_2010_2.xml');
//  atrshifr:=XMLDoc.documentElement.getAttribute('shifr');
  atrshifr:=xmldoc.documentElement.childNodes[0].attributes[2].nodeValue;
  XMLDoc:=nil;
  ShowMessage('Тип отчета:'+atrshifr)
  end;