delphi.net2009要如何用將資料寫入EXCEL的欄位內
如要在A1寫入'aaa'

什麼是 Delphi.net2009 ???

如果你問的是Delphi 2009

Use ComObj


[code delphi]

procedure TForm1.Button1Click(Sender: TObject);
var
vSheet, vWorkBook, vExcel : Variant;
begin
try
vExcel := CreateOleObject('Excel.Application');
vExcel.SheetsInNewWorkbook := 1;
vExcel.Visible := True;
vExcel.Caption := '應用程序調用 Microsoft Excel';
vExcel.DisplayAlerts := False;
vExcel.ScreenUpdating := False;
vWorkBook := vExcel.Workbooks.Add;
vSheet := vExcel.Worksheets.Item[1];
vSheet.Name :='Test';
vSheet.Cells[1, 1].value := 'aaa';
vExcel.ScreenUpdating := True;
except
VarClear(vSheet);
VarClear(vWorkBook);
vExcel.Quit;
VarClear(vExcel);
end;
end;
[/code]