如何在type library编辑器中定义自设的方法的企业规则？

Question

菜单View->TYPE library 
左边的树形导航中右键-〉new->method
在远程数据库模块单元里实现

Answer 1

我已经新建了方法getaliases,但不知在哪里定义这个方法的程序码？从哪里输入下列代码？
procedure Tproject1.getaliases(var vAliases:oleVariant);
begin
....
end;

Answer 2

菜单View->TYPE library 
选中接口
新建一个方法
设定好各项
最后再点击刷新按钮
然后在相应的单元里就有getaliases
不过，不会存在tproject1 里，而是存在远程对象模块里

Answer 3

“菜单View->TYPE library 
选中接口
新建一个方法
设定好各项
最后再点击刷新按钮
然后在相应的单元里就有getaliases”
以上内容我已经做了，但是程序码在哪里输入。