如何通过字符串索引OleVariant

Question

我将下面的示例代码德尔福：

http://msdn.microsoft.com/en-us/library/bb176406%28v=office.12%29.aspx

我的代码是这样的：

 
var 
    vTable, vRow: OleVariant; 
begin 
.... 

    while vTable.EndOfTable = False do 
    begin 
    vRow := vTable.GetNextRow; 
    sEmail := vRow['Email1Address']; 
    ShowMessage(sEmail); 
    end; 
end; 

的问题是，我需要传递一个字符串索引'Email1Address'，但Delphi给出错误：不兼容的类型：整型和字符串。

我应该使用不同类型的变体吗？

TIA

Answer 1

我已经采取了看从TLB文件生成的展望单元和它看起来像这样：

_Row = interface(IDispatch) 
    ['{000630D3-0000-0000-C000-000000000046}'] 
    //snip 
    function Item(Index: OleVariant): OleVariant; safecall; 
    //snip 
    end; 

该行接口有一个方法项目，这需要一个OleVariant。所以使用这个：

sEmail := vRow.Item('Email1Address'); 

也看看MSDN help。