BASP21のKconvをVCから利用する方法

質問

BASP21のKconvをVCから利用する方法をご存知の方はいらっしゃいますでしょうか？

下記のように
LoadLibrary、GetProcAddressを使いVC上からの実行を試しているのですが
どうにもうまくいきません。（EUCからUTF-8）
Kconvの実行個所でおちてしまいます。

何かわかりましたらお願いします。

typedef void*(*KCONV)(void*, int, int);
HINSTANCE hLibModule = NULL;
KCONV Kconv = NULL;

hLibModule = ::LoadLibrary(_T("Binetx.dll"));
Kconv = (KCONV)::GetProcAddress(hLibModule, "Kconv");
strOutStr = (char*)Kconv((void*)strInStr, 5, 2);

回答No.2

taka_tetsu · ベストアンサー

失礼しました。Kconvは関数でもサポートしてるんですね。
http://www.hi-ho.ne.jp/babaq/binetx.html

まぁ、使い方が思いっきり間違ってるのは変わりませんが。
strInStr、strOutStrの型もかかれてないし。

で、VBの呼び出し方が
Private Declare Function Kconv Lib "binetx" _
(inputvar As Variant, outtype As Long, intype As Long) As Variant

だというのに
>typedef void*(*KCONV)(void*, int, int);
はいくらなんでもひどすぎでは・・・。

あと、VBで呼べる=__stdcallですので、最低限関数の型はこうしないと。

typedef VARIANT (__stdcall * KCONV)(VARIANT *, int *, int *);

お礼

ご回答頂き、ありがとうございました。
早速試してみます。
またご縁ありましたら。よろしくお願い致します。

回答No.1

taka_tetsu

BASP21ってCOMでしょ？
使い方思いっきり間違ってませんか？

#importでBASP21.TLBを指定すれば簡単に使えるようになるとは思いますけど。