pb12.5呼叫zlib的compress函式時總是提示“bad runtime function reference”,請高手指點!
宣告:
Function Long compress (Ref Blob compr,Ref Long comprLen, Ref Blob buf, Long buflen) Library "zlib.dll"
Function Long uncompress (Ref Blob uncompr,Ref Long uncomprLen, Ref Blob compr, Long lcomp) Library "ZLIB.DLL "
呼叫:
blob bl_data_zip
long l_len,l_len_zip,l_rtn
l_len = len(bl_data)
l_len_zip = l_len * 1.01 + 13
bl_data_zip = blob(space(l_len_zip))
l_rtn = compress(bl_data_zip,l_len_zip,bl_data,l_len)
uj5u.com熱心網友回復:
宣告有問題,改為以下宣告,我用在專案里的,沒有問題是//壓縮
Function Long compress(Ref Blob compr, Ref Long comprLen, Ref Blob buf, Long buflen) Library "zlibwapi.dll" alias for "compress;Ansi"
//解壓縮
Function Long uncompress(Ref Blob uncompr, Ref Long uncomprLen, Ref Blob compr, Long lcomp) Library "zlibwapi.dll" alias for "uncompress;Ansi"
uj5u.com熱心網友回復:
謝謝版主!修改了宣告,還是同樣的錯誤,與zlibwapi.dll的版本和位置有關系嗎?uj5u.com熱心網友回復:
把zlibwapi.dll檔案放到system32目錄下,不再報錯了,但是比較壓縮后與壓縮前的資料長度,len(bl_data_zip),發現壓縮后的資料長度是壓縮前的2倍左右,越壓縮越大,搞不明白啊,還請版主指教!uj5u.com熱心網友回復:
弄個比較大的內容測驗一下,如幾M的,小的內容看不出。轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/29830.html
標籤:基礎類
上一篇:VB中呼叫PB的COM組件
