delphi 如何加入unit 单元

delphi 如何加入unit 单元

1. 创建 File - New - Unit
2. implementation 和 {$R *.dfm}之间加入 Unit
//--------------//
implementation
uses Unit2;
{$R *.dfm}

你这样只声明xmldocument1并没有创建啊. xmldocument1:=txmldocument.create(nil);//创建 try //干你的活.... xmldocument1.loadfromfile('c:\temp\test.xml'); showmessage(xmldocument1.documentelement.childnodes[0].childnodes['姓名'].text); finally xmldocument1.free;//用完要记得释放掉 end;

使用 uses 单元名就可以了。 单元的文件名一件是.pas的文件，可以单独引入其它工程中的.pas文件. 只需要将被引入的.pas文件放到和工程文件同一个目录中，然后 例如有一个单元名是 box.pas implementation uses box; {$R *.dfm} 这样就可以了。 我就这么干过，没有问题。

可以这样：菜单“Project”-->Add to Project -->选择已知unit单元文件-->打开。 之后在你需要使用此单元的文件中添加 uses 这个单元文件（不包括扩展名）; 可以在interface下添加，也可以在implementation下添加，注意如果可能最好是在implementation下添加，因为在interface下添加有可能造成循环引用导致程序无法编译 在interface下添加是因为有的时候需要被其他单元文件引用导出的函数或者方法，但是这个导出的函数或者方法有可能使用了你这个被引用单元文件的类或者数据结构的实例，这个时候是必须要在interface下使用你这个单元文件的！ 举个例子： 1，你要引用的单元文件：first.pas unit first; interface uses Windows; type TFirst = class(TObject) private { Private declarations } public { Public declarations } procedure go; end; implementation {$R *.dfm} procedure TFirst.go; begin end; end. 2.你现在使用的单元：Second.pas unit Second; interface uses Windows,first;//此处必须要在interface中引用你的单元因为下面的类定义中使用了first中的TFirst类 type TSecond = class(TObject) private { Private declarations } public { Public declarations } procedure go(Afirst:TFirst);//first单元中的类 end; implementation {$R *.dfm} procedure TSecond.go(Afirst:TFirst); begin Afirst.go; end; end.

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息