当我们打开一个Excel文件时，我们往往需要将它的数据进行处理，比如获取文件中所有行和列的数据，并进行显示。
这里，我简单的演示一下如何列举所有列名：
procedureTForm1.Button1Click(Sender: TObject);
Var
book: IXLSWorkbook;
i: integer;
begin
book := TXLSWorkbook.Create();
book.Open('c:\a.xls');
// 列出excel中工作表1的所有已使用的列的列名
fori := 1tobook.Sheets[1].UsedRange.LastCol do
Memo1.Lines.Add(book.Sheets[1].UsedRange.Item[1, i].Value);
book.Close;
end;
代码中，我们读取Sheet1第一行的所有列，并循环输出它的内容，请注意，这里应该使用UsedRange，而不是Cells，如果你使用Cells，那么LastCol将显示Excel支持的总列数，而不是实际已经使用的列数。
举一反三，那么如何获取所有行的数据呢？是不是只要使用UsedRange.LastRow就行了？那么，通过两个循环，就可以输出Excel中所有的内容了，是不是很简单？