起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 215|回复: 8

EXCEL怎么导入到DATAGRID?**

[复制链接]
发表于 2008-10-13 10:37:47 | 显示全部楼层 |阅读模式
如题
回复

使用道具 举报

发表于 2008-10-13 10:43:40 | 显示全部楼层
用ExcelToTable1: TExcelToTable;
具体可以在论坛里搜索。
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-10-13 11:01:34 | 显示全部楼层
服务器版本是1496
开发端版本是2276

使用TExcelToTable会不会有影响?
回复 支持 反对

使用道具 举报

发表于 2008-10-13 11:04:33 | 显示全部楼层
服务器版本是1496
开发端版本是2276

楼主为啥要这样使呢?这也不匹配啊?

看一下开发工具工具箱中justep Extend页面有没有exceltotable控件?
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-10-13 11:53:31 | 显示全部楼层
没有这个面版
回复 支持 反对

使用道具 举报

发表于 2008-10-13 11:56:56 | 显示全部楼层
那就是那个版本还不支持
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-10-13 17:19:50 | 显示全部楼层

采用ADO导入报错

procedure TMainForm.Button1Click(Sender: TObject);
var
  ADOCnn:TADOConnection;
  ADOTable: TADOTable;
  DataSource: TDataSource;
begin
  try
    ADOCnn:=TADOConnection.Create(self);
    ADOCnn.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:复件 采点记录表.xls;Extended Properties=''Excel 8.0'' ersist Security Info=False';
    ADOCnn.LoginPrompt:=False;
    ADOCnn.Open;
    ADOTable:=TADOTable.Create(Self);
    ADOTable.Connection:=ADOCnn;
    ADOTable.TableDirect:=true;
    ADOTable.TableName:='Sheet1$';
    ADOTable.Open;
    DataSource:=TDataSource.Create(Self);
    DataSource.DataSet:=ADOTable;
    DataGrid1.DataSource:=DataSource;
    DataGrid1.Refresh;
  except
  end;
end;

在这句的时候报错    DataGrid1.DataSource:=DataSource;

报错后数据还是正常显示

未命名.jpg

15.55 KB, 下载次数: 129

回复 支持 反对

使用道具 举报

发表于 2008-10-13 17:50:21 | 显示全部楼层
DataGrid不能表现AdoTable数据。
回复 支持 反对

使用道具 举报

发表于 2008-10-14 08:52:45 | 显示全部楼层
楼主,可以将adotable的数据复制到自定义数据集
datagrid可以表现自定义数据集的数据
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-23 03:02 , Processed in 0.045660 second(s), 18 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表