请问：DataMoudal如何创建create函数？ 急求！！！

请问：DataMoudal如何创建create函数？
具体的:
我在DataMoudal中放置了ADOConnection,ADOTable,Datasource;
这样写应该是不对吧：
procedure TDM.DataModuleCreate(Sender: TObject);
begin
ADOConnection1.ConnectionString:=
'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
'fo=False;Initial Catalog=ERP;Data Source=HJJ';
ADOTable1.Connection:=ADOConnection1;
DataSource1.DataSet:=ADOTable1;
end；
正确的用法是什么呢？

[此贴子已经被作者于2007-4-16 22:31:20编辑过]