プログラマメモ2: [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)

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

プログラマメモ2 - programmer no memo2