delphi dbgrid中的数据如何导入到excel表中？

来源：百度知道 编辑：UC知道 时间：2024/05/18 07:30:21
查了不少关於这方面的资料，始终没有找到一个能用的。
能否有高手帮我一下，步骤说明尽可能的详细点。。。
谢谢``，我笨着呢。。

这个问题很难，我粘贴一段我从excel中读数据的代码：
try
{
Variant v1;
ExcelApplication->Connect();
ExcelApplication->set_WindowState(0, xlMinimized);
//ExcelApplication->set_Visible(0, true);
try
{
Form5 = new TForm5(Application);
Form5->ShowModal();
delete Form5;
ExcelApplication->set_Visible(0, showexcel);
ExcelApplication->Workbooks->Open(StringToOleStr(OpenDialog1->FileName.c_str()));
ExcelApplication->set_Caption(StringToOleStr(OpenDialog1->FileName));
ExcelWorkbook->ConnectTo(ExcelApplication->Workbooks->get_Item(Variant(1)));
ExcelWorksheet->ConnectTo(ExcelWorkbook->Worksheets->get_Item(Variant(isheet)));
for(int i = 1; i < sRow; ++i)
for(int j = 1; j < sCol; ++j)
{
v1 = ExcelWorksheet->Cells->get_Item(