ActiveBasic + DXライブラリDLL でゲームを作るスレ

[0048 名前は開発中のものです。 2005/11/26(土) 20:02:25 ID:CpX2W39o]

thisポインタが正しく渡されないんだよね。
下のコードを実行させると確認できる。

class Foo
public
sub Func()
Print "this=", VarPtr(this)
endsub

sub Foo()
dim pFunc as *sub()
Print "this=", VarPtr(this)
pFunc = addressof(Func)
pFunc()
endsub
endclass
dim f as Foo()