如何把连接数据库语法做成模块进行引用？
con:=myinifile.Readstring ('access','connectionstring','');
name:=myinifile.Readstring ('access','TableName','');
adotable1.active:=false;
adotable1.connectionstring:=con;
adotable1.TableName:=name;
adotable1.active:=true;
我想把上面的语句作成一个模块，这样就不必重复写了，还有如何调用？我不知道这里是用procedure还是function？我想这个应该不用传递返回值的吧？
小弟刚开始用delphi，并不是很了解用法，先谢谢大家的帮忙和关注了。

[解决办法]
直接放到datamodal里就行了，自己写一个类也可以
[解决办法]
新建一个TDataModule，然后在别的单元引用这个DataModule就可以了。
[解决办法]
其它单用uses就可以了。
[解决办法]
新建一个TDataModule，然后在别的单元引用这个DataModule就可以.

function TdmData.tabelname(tableName: string; iID: integer): Boolean;
...
con:=myinifile.Readstring ('access','connectionstring','');
name:=myinifile.Readstring ('access','TableName','');
adotable1.active:=false;
adotable1.connectionstring:=con;
adotable1.TableName:=name;
adotable1.active:=true;
...
end;

然后再你要用的单元里面直接引用。