如何利用excel的range属性读取数据赋值给一数组？

[ganwen]

我用的是DELHI7版本，希望大家能够帮忙。谢谢！

[vistart]

建议看一下MSDN中Excel的对象模型
p.s.
创建Variant数组: values := VarArrayCreate([0, 9, 0, 1], varVariant); // 10 * 2

[ganwen]

我创建了呀，但是不行，我的部分代码为：
var
datas:variant;
wbst:_worksheet;
datas:=vararraycreate([1,288,1,1],variant);
datas:=wbst.range([cells.item[1,1],cells.item[287,1]).value;
希望大家帮忙看看，有写过的希望提供部分代码。