findcaiyzh 发表于 2007-9-11 15:38:29

自建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

哪里不对劲呢？

5am 发表于 2007-9-11 17:08:47

不需要include release_test.sbl?

findcaiyzh 发表于 2007-9-12 06:50:45

不管是否加include release_test.sbl? 都报重复定义的错：（

findcaiyzh 发表于 2007-9-13 08:43:05

算了，实现也写在头文件里得了。

uttipy 发表于 2007-9-14 19:49:48

你可以将所有定义全部放在一个头文件中，将实现分在不同的sbl中，并且在sbh中include各个sbl文件。

WUHA 发表于 2007-9-21 10:28:01

在你的release_test.sbl省略 '$Include "test_release.sbh"
页: [1]
查看完整版本: 自建sbl库 重复定义的问题