库存管理软件版1楼: procedure TForm1.TableToTreeview(Tree:TTreeView;ParentNode:TTreeNode;ImageIndex,SelectImageIndex:Integer;ParentId:String);
var
TempQuery:TADOQuery;
CurrNode:TTreeNode;
begin
TempQuery:=TADOQuery.Create(nil);
try
TempQuery.Connection:=Datamd.DataModule1.ADOConnection1; //这里出错怎么办
TempQuery.Close;
TempQuery.SQL.Text:=＇＇select * from bmmc where parentid=:parentid＇＇;
TempQuery.Parameters.ParamByName(＇＇parentid＇＇).Value:=ParentId;
TempQuery.Open;
finally
TempQuery.Free;
end;
end;

2楼: 你不说是什么错，怎么帮你。。。要是说没有adoconnection1的话。你要在程序文件中加入引用呀。
uses
你的数据模块文件名 如进销存免费版

3楼: 已经uses datamd啦？现在更奇怪了连
procedure TForm1.FormCreate(Sender: TObject);
begin
datamd.DataModule1.ADOQuery2.Close; //连这句都不认了,是什么原因造成的呀？

end;

4楼: datamd 是什么？
DataModule1 是数据模块？

5楼: datamd是我的数据模块名？

6楼: procedure TForm1.TableToTreeview(Tree:TTreeView;ParentNode:TTreeNode;ImageIndex,SelectImageIndex:Integer;ParentId:String);

var
TempQuery:TADOQuery;
CurrNode:TTreeNode;
begin
TempQuery:=TADOQuery.Create(nil);
try
TempQuery.Connection:=Datamd.ADOConnection1; //这里出错怎么办
TempQuery.Close;
TempQuery.SQL.Text:=＇＇select * from bmmc where parentid=:parentid＇＇;
TempQuery.Parameters.ParamByName(＇＇parentid＇＇).Value:=ParentId;
TempQuery.Open;
finally
TempQuery.Free;
end;
end;

库存管理软件版7楼: 是运行错误还是编译错误都没有讲....!!

8楼: 这里又该如何解释
procedure TForm1.FormCreate(Sender: TObject);
begin
datamd.DataModule1.ADOQuery2.Close; //连这句都不认了,是什么原因造成的呀？

end;

9楼: 按F9运行就出错呀？[:)]

10楼: 是什么原因造成的呀？[:)]

11楼: datamd 是什么？
引用数据模块只要 DataModule1.XXX 就行了，干吗要在前面加什么 datamd ？？？

12楼: datamd
是个什么东西？你没有解释清楚啊 如速达3000进销存软件

13楼: 又不说提示什么错误！浪费这么多口舌！

库存管理软件版14楼: ymg1103 有： 77个待答问题， 15个已答问题， 回答了： 6 个问题。
楼主真没什么良心啊！

15楼: 那因为你们根本就没有把人家的问题解决掉？