三层结构的方法只能写procedure吗？ 怎么样写Function ?

Question

在RemoteDataMoudle中
我发现好象定义完方法后默认自动生成的都是 procedure ..
我想写 Function ..怎么写？  Function GetData(const ASql: WideString): OleVariant;怎么写？

Answer 1

建一个指针参数, 参数名随便起反正是没用, 后面参数类型加上 RetVal, 保存, 就出现 function 了你这例 是 VARIANT * [out, retval]

Answer 2

有多大区别吗？procedure 用 var 说明参数就可以了

Answer 3

Tools->Environments Options->Type Library->Language->Pascal,默认是IDL