Delphi对Excel的操作

Question

各位大大，小弟我准备在Delphi中对Excel进行导入然后把Excel表格中的内容变换下位置再导出，不需要和数据库关联，这样怎么解决啊？小弟没用过Delphi请大大们详细点，有现成代码最好。

Answer 1

用内存表方式打开excel，然后调整后另外保存

Answer 2

shell 不行吗
如果不SHELL，应该是引用组件，打开D中的工具，引用那个组件，至于具体的名字，查一下，陈省的DELPHI深度探索中有详细说明

Answer 3

陈省的DELPHI深度探索中有详细说明，在哪找呢？

Answer 4

uses ComObj;procedure TForm1.Button1Click(Sender: TObject);
var
Excel:Variant;  i:integer;
begin
    Excel:=CreateOleObject('Excel.Application');
    Excel.workbooks.open('D:\test.xls');
    Excel.worksheets[1].activate;
    Excel.Visible:=true;
    for i:=1 to Excel.worksheets[1].UsedRange.Rows.count do
    begin
        Memo1.Lines.Add(Excel.cells[i,3].value);//读
        Excel.cells[i,3].value:='ab';//写
    end;
    Excel.ActiveWorkBook.Save;
    Excel.workbooks.close;
    //Excel.Disconnect;
    Excel.quit;
end;其余的根据要求自己补充即可