dbgride运行后表中没有表格中转换成数值格式是怎么回事

来源：蜘蛛抓取(WebSpider) 时间：2018-07-03 15:53 标签： 对比两个表格中的数值
图书馆数据库课程设计_百度文库
您的浏览器Javascript被禁用，需开启后体验完整功能，
享专业文档下载特权
&赠共享文档下载特权
&10W篇文档免费专享
&每天抽奖多种福利
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
图书馆数据库课程设计
&&图书馆管理系统经典
阅读已结束，下载本文需要
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，同时保存到云知识，更方便管理
加入VIP
还剩12页未读，
定制HR最喜欢的简历
你可能喜欢急求delphi高手,请问如何让dbride中显示的数据按照某一字段升序排列显示?请各位高手 、大侠帮忙啊!!_百度知道
急求delphi高手,请问如何让dbride中显示的数据按照某一字段升序排列显示?请各位高手 、大侠帮忙啊!!
其他说明:数据库里的数据是按照某字段顺序排列的,但到dbgride中显示出来就不是按照库中的顺序了!),
对不起，我是采鸟，能否说的详细点？
我有更好的答案
这和dbgrid没关系你修改SQL语句就行了select * from 表名 order by 字段名 asc
采纳率：43%
为您推荐：
其他类似问题
您可能关注的内容
delphi的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。我用的是DELPHI7.0中BDE,请问在DBGrid中利用TQuery和DataSource删除一条记录后,怎样才能让刷新后的数据再次显示在DBGrid中?
[问题点数：5分，结帖人uyjkg]
本版专家分：10
结帖率 33.33%
CSDN今日推荐
本版专家分：35
本版专家分：10
结帖率 33.33%
本版专家分：275
本版专家分：20210
本版专家分：35
本版专家分：906
本版专家分：4827
本版专家分：92
本版专家分：29
匿名用户不能发表回复！|
CSDN今日推荐我在delphi做了个程序，现在我先将DBGrid中的数据导出EXECL中，怎么做了，我是新手，最后有注解_百度知道
我在delphi做了个程序，现在我先将DBGrid中的数据导出EXECL中，怎么做了，我是新手，最后有注解
我有更好的答案
别不多说，直接给你个我做的列子吧 注意uses ComO//dbgird导出excelprocedure Tjhc_pzmdcs_f.ExportExc(DG :TDBG mdzl:string);var
ExcelApp: V
if DG.DataSource.DataSet.IsE
ExcelApp := CreateOleObject( 'Excel.Application' );
ExcelApp.Caption := '应用程序调用 Microsoft Excel';
ExcelApp.WorkBooks.A
ExcelApp.WorkSheets[1].A
ExcelApp.Cells[1,1].Value := '品种代码';
ExcelApp.Cells[1,2].Value := '品种名称';
ExcelApp.Cells[1,3].Value := '机型';
ExcelApp.Cells[1,4].Value :=ExcelApp.ActiveSheet.Columns[1].ColumnWidth := 12;
ExcelApp.ActiveSheet.Columns[2].ColumnWidth := 30;
ExcelApp.ActiveSheet.Columns[3].ColumnWidth := 18;
ExcelApp.ActiveSheet.Columns[4].ColumnWidth := 12;DG.DataSource.DataSet.F
for j:=1 to DG.DataSource.DataSet.RecordCount do
ExcelApp.Cells[j+1,1].Value := DG.DataSource.DataSet.FieldByName('x_pzdm').
ExcelApp.Cells[j+1,2].Value := DG.DataSource.DataSet.FieldByName('l_pzdm').
ExcelApp.Cells[j+1,3].Value := DG.DataSource.DataSet.FieldByName('x_jx').
if mdzl = '密度常数' then
ExcelApp.Cells[j+1,4].Value := DG.DataSource.DataSet.FieldByName('x_mdcs').
if mdzl = '密度常数平均值' then
ExcelApp.Cells[j+1,4].Value := DG.DataSource.DataSet.FieldByName('x_mdcspjz').
DG.DataSource.DataSet.N
ExcelApp.ActiveSheet.Rows[1].Font.Bold := T
ExcelApp.ActiveSheet.Rows[1].Font.size := 18;
ExcelApp.Cells.VerticalAlignment := 2;
ExcelApp.Cells.HorizontalAlignment := 3;
ExcelApp.Cells.Font.Size:=12;
ExcelApp.ActiveSheet.PageSetup.CenterHorizontally := T
ExcelApp.ActiveSheet.PageSetup.CenterVertically := T
ExcelApp.Visible := T
采纳率：50%
你在网上查一下dbgride 导出到excel 可以找出一大片。下次问前先在网上找一下。。
能找到解决办法就不会在百度问了.....晕死
为您推荐：
其他类似问题
您可能关注的内容
dbgrid的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。DELPHI 表格控件DBGridEh全属性设置详解
最全的属性设置说明_百度文库
您的浏览器Javascript被禁用，需开启后体验完整功能，
享专业文档下载特权
&赠共享文档下载特权
&10W篇文档免费专享
&每天抽奖多种福利
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
DELPHI 表格控件DBGridEh全属性设置详解
最全的属性设置说明
&&DELPHI 表格控件DBGridEh属性设置详解 ,花了几天时间整理出来的,应该是目前最全的了
阅读已结束，下载本文需要
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，同时保存到云知识，更方便管理
加入VIP
还剩3页未读，
定制HR最喜欢的简历
你可能喜欢

我要回帖

更多关于 对比两个表格中的数值 的文章

 

随机推荐