不行啊,
我的代码如下
ExcelID: Variant;
begin
ExcelID := CreateOleObject('Excel.Application');
ExcelID.Visible := True;
ExcelID.Caption := '123';
ExcelID.WorkBooks.Add;
ExcelID.Cells[1, 1].Value := 'a';
ExcelID.Cells[1, 2].Value := 'b';
ExcelID.Cells[1, 3].Value := 'c';
ExcelID.Cells[1, 4].Value := 'd';
ExcelID.Cells[1, 5].Value := 'e';
end;
加在那个地方呢