? ? 許多熟練使用C的程序員在使用PowerBuilder時(shí)都希望自己以前在C上做的工作可以被PowerBuilder所引用,這是完全可以的。在PowerBuilder中你可以通過(guò)外部引用函數(shù)的形式來(lái)調(diào)用動(dòng)態(tài)連接庫(kù)(DLL)中的函數(shù)。筆者在此闡述PowerBuilder調(diào)用DLL時(shí)的參數(shù)傳遞方法。

??? 一般情況下,在PowerBuilder的script調(diào)用DLL中的函數(shù)都要傳遞參數(shù),以便DLL中的函數(shù)知道應(yīng)該作什么。DLL中的函數(shù)可以有返回值或通過(guò)修改參數(shù)來(lái)返回結(jié)果。缺省情況下
,PowerBuilder通過(guò)傳值法來(lái)傳遞參數(shù)(passed by value)。這意味著PowerBuilder將對(duì)傳遞的參數(shù)做一份拷貝,然后通過(guò)堆棧將這份拷貝傳遞給函數(shù)。因此函數(shù)中所有對(duì)參數(shù)的修改
都不會(huì)影響作為參數(shù)的變量的原值。使用傳值法調(diào)用的函數(shù)可以通過(guò)返回值來(lái)報(bào)告執(zhí)行結(jié)果。如果你希望DLL中的函數(shù)可以改變調(diào)用參數(shù)的原值,就可以通過(guò)參考傳值法(passed reference)來(lái)傳遞參數(shù),其說(shuō)明方法如下:
Function int PassArgument(REF int refarg) LIBRARY"mydll.dll"
通過(guò)在參數(shù)類(lèi)型前面加REF關(guān)鍵字來(lái)聲明該參數(shù)將要用參考傳值法傳遞。這意味著,PowerBuilder不在堆棧中做參數(shù)拷貝,而是將指向參數(shù)的指針壓入堆棧傳遞給DLL中的函數(shù)。讓我們?cè)敿?xì)看一下這兩種參數(shù)傳遞方法的區(qū)別(本文使用的C代碼是用Visual C1.5編寫(xiě)的)。

?

.在使用DLL時(shí)有一些基本規(guī)則
??? 一個(gè)DLL在被裝入內(nèi)存后,只會(huì)有一個(gè)實(shí)例,不會(huì)因?yàn)槎鄠€(gè)程序使用同一個(gè)DLL而在內(nèi)存中產(chǎn)生多個(gè)DLL拷貝,每個(gè)DLL只有一個(gè)最大為64K的數(shù)據(jù)段。缺省情況下,PowerBuilder都是使用傳值法來(lái)傳遞參數(shù)。當(dāng)你在函數(shù)應(yīng)用說(shuō)明時(shí)使用了REF關(guān)鍵字,PowerBuilder將傳遞一個(gè)32位的地址指針(段地址+偏移量)給被調(diào)用的函數(shù),而不象一般情況下只傳遞偏移量。這才能保證DLL中的函數(shù)能得到PowerBuilder中數(shù)據(jù)的正確地址。在PowerBuilder中沒(méi)有的C的數(shù)據(jù)類(lèi)型可以在PowerBuilder中說(shuō)明成字節(jié)數(shù)相等的數(shù)據(jù)類(lèi)型,例如:

int,short,unsigned int,unsigned short,BOOL,WORD 都可以說(shuō)明為 int。

long,unsigned long,DWORD 都可以說(shuō)明為 long。

所有的句柄 都可以說(shuō)明為 int。

LPSTR和LPBYTE 都可以說(shuō)明為 string。

對(duì)于結(jié)構(gòu),要在C和PowerBuilder中做相等的說(shuō)明。

PowerBuilder不支持函數(shù)指針的傳遞。

如果DLL的參數(shù)需要空指針(NULL),你可以向函數(shù)傳遞一個(gè)值為0的長(zhǎng)整型。

?

.傳遞參數(shù)實(shí)例
1)從DLL的函數(shù)中返回一個(gè)整型值
在PowerBuilder中聲明如下:
FUNCION int Find AvailableRAM() LIBRARY"dllsamp.dll"
在Powerscript中的調(diào)用格式
int memavail
memavail=FindAvailableRAM()
在C中的代碼
WORD FAR PASCAL_export FindAvailableRAM(void)
{
? int memavail;
? //find available memory,store in memavail
? ……
? return memavail;
}

2)通過(guò)傳值法傳遞一個(gè)整型參數(shù)
在PowerScript中聲明如下：
FUNCTION int FindAvailableDiskSpace(int Drive Number) Library "dllsamp.dll"
在PowerBuilder中的調(diào)用格式
int AvailableDiskSpace
AvailableDiskSpace=FindAvailableDiskSpace(1)
在C中的代碼
WORD FAR PASCAL_export FindAvailableDiskSpace(WORD DriveNumber)
{
? int diskspaceavailable;
? //processing to find available disk space for passed DriverNumber
? ......
? return diskspaceavailable;
}

3)通過(guò)參考傳值法傳遞一個(gè)整型參數(shù)
在PowerBuilder中聲明如下:
SUBROUTINE FindAvailableDiskSpaceonCDrive(REF int bytesAvailable) Library "dllsamp.dll"
如果我們不需要函數(shù)的返回值,可以在PowerBuilder中將該函數(shù)聲明為SUB-ROUTINE。
在PowerScript中的調(diào)用格式：
int bytesAvail
FindAvailableDiskSpceonCDrive(bytesAvail)
在C中的代碼
void FAR PASCAL_export FindAvailableDiskSpaceonCDrive(WORD *bytesavailable )
//processing to get available bytes on C driver
*bytesavailable = (whatever the result of the caculation was);
可見(jiàn)通過(guò)參考傳值法,C中的函數(shù)可以直接修改PowerScript中定義的變量。

4)向DLL中的函數(shù)傳遞數(shù)組
傳遞數(shù)值數(shù)組和字符串?dāng)?shù)組的處理方法是相似的,如果你想在函數(shù)中修改PowerScript中的變量,要在傳遞的參數(shù)前加上REF關(guān)鍵字,下面是使用數(shù)組的例子:
在PowerBuilder中聲明如下：
FUNCTION int myfunction(int array1[],int array2[],REF int array3[]) Library "dllsamp.dll"
在C中的代碼
WORD FAR PASCAL_export myfunction(WORD*array1,WORD*array2,WORD*array3)
凡是用參考方法傳遞的參數(shù),都可以出現(xiàn)在付值表達(dá)式的左邊,如:
*array3 = *array1 + *array2;
字符串?dāng)?shù)組的使用方法類(lèi)似,只是用LPSTR代替WORD。但是如果使用任何與內(nèi)存尋址有關(guān)的C函數(shù),都要使用C中的far版本。例如字符串拷貝函數(shù),應(yīng)該用_fstrcpy而不要用strcpy。

5)向DLL中的函數(shù)傳遞結(jié)構(gòu)
傳遞結(jié)構(gòu)同樣可以使用傳值法和參考方法。用參考方法傳遞的結(jié)構(gòu)可以在C中直接修改在PowerScript中定義的結(jié)構(gòu)成員。PowerBuilder支持結(jié)構(gòu)數(shù)組和嵌套結(jié)構(gòu)的傳遞。傳遞結(jié)構(gòu)時(shí),要在C中說(shuō)明與PowerScript中完全相同的結(jié)構(gòu),如果C中結(jié)構(gòu)成員的類(lèi)型與PowerScript中不能完全相同,那么字節(jié)數(shù)應(yīng)相同,通過(guò)在C中進(jìn)行強(qiáng)制類(lèi)型轉(zhuǎn)換來(lái)得到正確的參數(shù)值。下面是傳遞結(jié)構(gòu)的例子:
在PowerBuilder中聲明如下：
SUBROUTINE mysub(REF aStruct aStructureName) LIBRARY "dllsamp.dll"
在C中定義如下
typedef struct s_tag{
? char*szString;
? double aNumber;
}*S_PTR;
void mysub(S_PTR answer)
answer->aNumber-12345;
另外,PowerBuilder中Date,Time和Decimal類(lèi)型不能直接傳遞給C函數(shù),要先轉(zhuǎn)換成字符串,再傳遞給C函數(shù)。Double類(lèi)型不能直接傳遞給Borland C++寫(xiě)的函數(shù),但是Visual C++可以。

?

?

.使用DLL的常見(jiàn)錯(cuò)誤和需要注意的地方
1)導(dǎo)致GP錯(cuò)(general protection fault)
在Windows中,如果你企圖訪問(wèn)不是屬于你的應(yīng)用程序的內(nèi)存將導(dǎo)致GP錯(cuò)。導(dǎo)致GP錯(cuò)的原因可能有以下幾點(diǎn):
a.向DLL中的函數(shù)傳遞了不正確的參數(shù)。這種錯(cuò)誤是比較難調(diào)試的,因?yàn)镻owerBuilder的調(diào)試器不能跟蹤到C程序中。你可以通過(guò)在C中使用MessgaeBox函數(shù)顯示調(diào)用參數(shù)的方法來(lái)檢查參數(shù)傳遞的正確性。更全面的方法是使用Windows的調(diào)試版本(帶有調(diào)試信息的Windows環(huán)境)和功能更強(qiáng)的調(diào)試器(Soft-ice for windows)。
b.C中對(duì)數(shù)組的訪問(wèn)超出了PowerBuilder中申請(qǐng)的邊界。
在C中是不作數(shù)組邊界檢查的,這可能是導(dǎo)致GP錯(cuò)的最常見(jiàn)的原因!
c.使用了已經(jīng)釋放的內(nèi)存指針。你最好把已經(jīng)釋放的內(nèi)存指針置為NULL,以便在使用前進(jìn)行判斷。

?

2)使用遠(yuǎn)指針
在C中,所有的靜態(tài)變量和全局變量都是在程序的堆中分配的,其他變量都是在堆棧中分配的。DLL可以有自己的數(shù)據(jù)段,但是它沒(méi)有堆棧段,因此使用調(diào)用程序的堆棧。這就意味著DS指向DLL 的數(shù)據(jù)段,SS指向PowerBuilder應(yīng)用程序的堆棧。在一般的Windwos應(yīng)用程序中,DS和SS是相同的,你可以使用近指針但在DLL中必須使用32的遠(yuǎn)指針。

?

3)注意靜態(tài)變量的使用
無(wú)論有多少實(shí)例調(diào)用同一個(gè)DLL,在內(nèi)存中只有一份DLL代碼。
由于Windows是多任務(wù)的環(huán)境,因此DLL中的靜態(tài)變量可能由于其他實(shí)例對(duì)此DLL的調(diào)用而改變!

?

4)不要試圖共享文件句柄
在Windows環(huán)境下,不可能在應(yīng)用程序和DLL間共享文件句柄。每個(gè)應(yīng)用有各自的文件句柄表,如果兩個(gè)應(yīng)用通過(guò)一個(gè)DLL來(lái)訪問(wèn)同一文件,它們必須分別打開(kāi)這個(gè)文件。

?

5)及時(shí)地釋放使用過(guò)的資源
如果你的DLL中使用了GDI對(duì)象,一定要及時(shí)釋放它們,否則會(huì)使Windows因申請(qǐng)GDI資源失敗而死住!例如你建立了一個(gè)邏輯字體或邏輯筆,在使用完后,要用DeleteObject來(lái)刪除它。