初学DELPHI，请教XML的问题

写了如下代码，读xml文件的
Procedure TReadCgml.ReadCgml(infile:String);
Var
  cgmlDoc:TXMLDocument;
Begin
  Try
    cgmlDoc.LoadFromFile(infile);
    cgmlDoc.Active := True;
  Except
    On E:Exception Do
    Begin
      Write('Read Error');
      Exit;
    End;
  End;出现异常“Access violation at address FFFD97E8..."请问正确的用法是什么？机理何在？