ページ 1 / 1
ByRef引数を持つ関数のオーバーロードができない
Posted: 2006年5月08日(月) 02:57
by k.kiyo
引数にByRefが指定されている関数のオーバーロードができません。
ポインタ引数の場合は正常にオーバーロードできます。
コード: 全て選択
Sub Test()
End Sub
Sub Test(p As *Long)
End Sub
Sub Test(ByRef p As Long)
End Sub
Dim a As Long, b As *Long
b = VarPtr(a)
Test() 'OK
Test(b) 'OK
Test(ByVal b) '"Test" オーバーロードを解決できません
返信@yu0627
Posted: 2006年5月27日(土) 21:28
by yu0627
あまりオーバーロードに詳しくありませんが、元々無理だと思います。
なぜなら、同じ名前の関数が3つもあるからです。
コード: 全て選択
Sub Test()
End Sub
Sub Test2(p As *Long)
End Sub
Sub Test3(ByRef p As Long)
End Sub
Dim a As Long, b As *Long
b = VarPtr(a)
Test() 'OK
Test2(b) 'OK
Test3(ByVal b)
こうだとうまくいくと思いますが...。
ほんと関数のオーバーロードは知らないので、間違っていたらすみません...。
Re: ByRef引数を持つ関数のオーバーロードができない
Posted: 2006年5月27日(土) 21:34
by 7
> 引数にByRefが指定されている関数のオーバーロードができません。
> ポインタ引数の場合は正常にオーバーロードできます。
たぶんですけど、すでにLong型変数へのポインタを引数とする関数が同じ名前で定義されてるからじゃないでしょうか。
コード: 全て選択
Class CTest
Public
' Long型変数へのポインタ p を引数とする
Sub Test(ByVal p As *Long)
End Sub
' Long型変数へのポインタ p を引数とする
Sub Test(ByRef p As Long)
End Sub
End Class
あ。普通の関数でオーバーロード(ライド?)できるようになってたんですね。気付かなかった。
Posted: 2006年5月27日(土) 21:40
by イグトランス
Test(b[0])とすればコンパイルできオーバーロードも正しく解決されます。
配列でないものに添え字演算子を使うのが気持ち悪いですが,
このバグが修正されるまではとりあえずこれで我慢してはどうでしょう。
個人的には間接参照演算子(C/C++の単項 * )のようなものがあればいいのにと思います。(しかも後置演算子として)
Posted: 2006年5月29日(月) 02:03
by k.kiyo
> 配列でないものに添え字演算子を使うのが気持ち悪いですが,
> このバグが修正されるまではとりあえずこれで我慢してはどうでしょう。
はい、そうします。