[delphi] VarUtilsのVariantInitは、TVarDataを引数にとります。

Delphiです。Delphi2010を使ってます。

ちょっと踏み込んでDelphiでWin32なプログラムを作成しようとすると勝手がよくわかりません。。。
さて、

VARIANT vEmpty;
略
::VariantInit(&vEmpty);
略
というコードをみてdelphiでどうやるんだろうと思って調べました。


調べたら、
略
vEmpty: OleVariant;
略
VariantInit(vEmpty);
かなーって感じでしたが、これだとコンパイル時にエラーがでます。

略
vEmpty: TVarData;
略
VariantInit(vEmpty);
ってするみたいです。

もしくは、
略
vEmpty: OleVariant;
略
VariantInit(TVarData(vEmpty));
って感じ

OleVariantを引数にとるAPIに渡すときは、逆に変換してあげないといけないのかな。

OleVariant(vEmpty)


よくわかってないけど....
あやういな

コメント