自己写了个类，运行出现不知名错误，请帮忙，谢谢

Question

我用的是delphi 6
新建了一个application，和一个单元文件，单元文件类只有一个类，运行出现不知名错误，请大家帮忙看看是什么问题内容分别如下。unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, yXmlDoc;
type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
var
  xc : XmlClass;
begin
  xc := XmlClass.Create('Config.Xml');
end;
end.和————————————————————————>unit yXmlDoc;
interface
uses
  XmlDoc;
type
  XmlCLass = class
    Xd : TXMLDocument;
  private
  public
    constructor Create(const XmlFileName : String);
  end;
implementation
constructor XmlCLass.Create(const XmlFileName : String);
begin
  Self.Xd.Create(nil);
  Self.Xd.LoadFromFile(XmlFileName);
  Self.Xd.Active := true;
end;
end.TXMLDocument的Create有两个重载的一个是Create(const AFileName : WideString)
另一个是Create(AOwner : TComponent)但是我用nil为参数，传进去，却出现不知名运行错误
错误提示都没有，我真的不知道应该怎么办了，请大家帮帮忙，谢谢

Answer 1

Self.Xd.Create(nil); //这句错了
//////////
  Xd := TXMLDocument.Create(nil);
  Xd.LoadFromFile(XmlFileName);
  Xd.Active := true;