Delphi7.0读入数据到DBGrid并向Word中插入表格，其实就是Delphi向Word中插入表格，测试数据由Delphi从SQLSERVER中读取，然后放入DBGrid中，再将DBGrid网格中的数据通过Word转换成表格。 　　begin 　　ifTStringGrid(DBGrid1).RowCount>0then 　　begin 　　//创建一个word对象 　　wordApp:=CreateOleObject('Word.Application'); 　　wordApp.Visible:=true; 　　//创建一个word文档