如何在PowerBuilder與DLL之間傳遞參數

如何在PowerBuilder與DLL之間傳遞參數
Powersoft中國有限公司 霍軍

--------------------------------------------------------------------------------
?
??? 許多熟練使用C的程序員在使用PowerBuilder時都希望自己以前在C上做的工作可以被PowerBuilder所引用,這是完全可以的。在PowerBuilder中你可以通過外部引用函數的形式來調用動態(tài)連接庫(DLL)中的函數。筆者在此闡述PowerBuilder調用DLL時的參數傳遞方法。
??? 一般情況下,在PowerBuilder的script調用DLL中的函數都要傳遞參數,以便DLL中的函數知道應該作什么。DLL中的函數可以有返回值或通過修改參數來返回結果。缺省情況下
,PowerBuilder通過傳值法來傳遞參數(passed by value)。這意味著PowerBuilder將對傳遞的參數做一份拷貝,然后通過堆棧將這份拷貝傳遞給函數。因此函數中所有對參數的修改
都不會影響作為參數的變量的原值。使用傳值法調用的函數可以通過返回值來報告執(zhí)行結果。如果你希望DLL中的函數可以改變調用參數的原值,就可以通過參考傳值法(passed reference)來傳遞參數,其說明方法如下:
Function int PassArgument(REF int refarg) LIBRARY"mydll.dll"
通過在參數類型前面加REF關鍵字來聲明該參數將要用參考傳值法傳遞。這意味著,PowerBuilder不在堆棧中做參數拷貝,而是將指向參數的指針壓入堆棧傳遞給DLL中的函數。讓我們詳細看一下這兩種參數傳遞方法的區(qū)別(本文使用的C代碼是用Visual C1.5編寫的)。

?

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

int,short,unsigned int,unsigned short,BOOL,WORD 都可以說明為 int。

long,unsigned long,DWORD 都可以說明為 long。

所有的句柄 都可以說明為 int。

LPSTR和LPBYTE 都可以說明為 string。

對于結構,要在C和PowerBuilder中做相等的說明。

PowerBuilder不支持函數指針的傳遞。

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

?

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

2)通過傳值法傳遞一個整型參數
在PowerScript中聲明如下：
FUNCTION int FindAvailableDiskSpace(int Drive Number) Library "dllsamp.dll"
在PowerBuilder中的調用格式
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)通過參考傳值法傳遞一個整型參數
在PowerBuilder中聲明如下:
SUBROUTINE FindAvailableDiskSpaceonCDrive(REF int bytesAvailable) Library "dllsamp.dll"
如果我們不需要函數的返回值,可以在PowerBuilder中將該函數聲明為SUB-ROUTINE。
在PowerScript中的調用格式：
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);
可見通過參考傳值法,C中的函數可以直接修改PowerScript中定義的變量。

4)向DLL中的函數傳遞數組
傳遞數值數組和字符串數組的處理方法是相似的,如果你想在函數中修改PowerScript中的變量,要在傳遞的參數前加上REF關鍵字,下面是使用數組的例子:
在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)
凡是用參考方法傳遞的參數,都可以出現(xiàn)在付值表達式的左邊,如:
*array3 = *array1 + *array2;
字符串數組的使用方法類似,只是用LPSTR代替WORD。但是如果使用任何與內存尋址有關的C函數,都要使用C中的far版本。例如字符串拷貝函數,應該用_fstrcpy而不要用strcpy。

5)向DLL中的函數傳遞結構
傳遞結構同樣可以使用傳值法和參考方法。用參考方法傳遞的結構可以在C中直接修改在PowerScript中定義的結構成員。PowerBuilder支持結構數組和嵌套結構的傳遞。傳遞結構時,要在C中說明與PowerScript中完全相同的結構,如果C中結構成員的類型與PowerScript中不能完全相同,那么字節(jié)數應相同,通過在C中進行強制類型轉換來得到正確的參數值。下面是傳遞結構的例子:
在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類型不能直接傳遞給C函數,要先轉換成字符串,再傳遞給C函數。Double類型不能直接傳遞給Borland C++寫的函數,但是Visual C++可以。

?

?

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

?

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

?

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

?

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

?

5)及時地釋放使用過的資源
如果你的DLL中使用了GDI對象,一定要及時釋放它們,否則會使Windows因申請GDI資源失敗而死住!例如你建立了一個邏輯字體或邏輯筆,在使用完后,要用DeleteObject來刪除它。