标题: 自建sbl库 重复定义的问题 [打印本页] 作者: findcaiyzh 时间: 2007-9-11 15:38 标题: 自建sbl库 重复定义的问题 想加入一个文件，用于保存通用函数。
步骤:
1. 在\SQABas32下建立test_release.sbh
加入函数声明:
Declare Function GetRandomName Basiclib "release_test" (nLength As Integer) as String
2. 在\SQABas32下建立release_test.sbl
加入函数实现:
'$Include "test_release.sbh"
Function GetRandomName(nLength As Integer) as String
GetRandomName = "111"
End Function
3. 使用库
加入'$Include "test_release.sbh"
然后调用函数
Dim strName as String
strName = GetRandomName(111)
但是，编译错误：（
release_test.sbl(3) Error: Redefinition of procedure 'GetRandomName'
release_test.sbl(5) Error: Can't assign value to function: GetRandomName