如何在DBGrid中知道当前编辑的行是新增的一行还是修改的一行

Panghuang 2002-05-15 04:36:27

如何在DBGrid中知道当前编辑的行是新增的一行还是修改的一行,本人在线恭候

...全文

74 3 打赏收藏转发到动态举报

写回复

用AI写文章

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

Panghuang 2002-05-16

打赏
举报

我发现一个函数，GetAddNewMode好像是正确的，不知那位有资料的帮我查一下

dyw 2002-05-15

打赏
举报

定义一个变量,在以下事件发生时纪录状态。
BeforeInsert
BeforeUpdate

Panghuang 2002-05-15

打赏
举报

希望高手帮忙，不胜感激

delphi 对dbgrid的添加修改删除数据操作 sql数据库

C1TrueDbGrid显示页脚,可用于现实C1TrueDbgrid控件的即时页脚

扩充DBGrid功能，支持行号，多行标题，图像字段、合计等，内有说明书，请看清了再跟贴

DBGrideh.pas，可分组合并修改版

功能更加强劲，增加多行表头的功能，新增更多事件，加强了打印期间对报表样式的控制，可随意改变打印内容。 reprint 使用说明本控件可打印 datasource,dbgrid,stringgrid. 一、控件属性： 1、colstitle 设置报表的列标题属性 (1) Print:boolean;;是否打印 (2) Font:tfont;;字体 (3) Rowsline:tpen;;横线样式 (4) Colsline:tpen;;竖线样式 (5) Alignment:talignment;;对齐方式 (6) Rowspace:integer;;行间距 (7) EveryPage:boolean;;是否每页打印 (8) EveryRow:boolean;;是否每行打印 (9) titlearray:tstrings;;怎加标题组 (使用方法见附带demo) (10) rows:integer;;设置默认列标题打印行数 2、datasource 绑定 datasource 3、dbgrid 绑定 dbgrid 4、stringgrid 绑定 stringgrid PrintObject 选择打印的对象(datasource 、dbgrid、 stringgrid ) 5、pagefooter 页脚 pageheader 页眉 (1) Text:string;;内容 (2) Font:tfont;;字体 (3) Print:boolean;;是否打印 (4) Alignment:talignment;;对齐方式 6、detail 设置要打印的明细数据属性 (1)arrange 设置明细字段排列方向 Horizontal 横向打印（默认的一般打印） Vertical 竖向打印（字段竖向排列适合打印字段内容较长的报表如“会议纪录”） (2)aotureturn 打印明细字段时，如果字段超过列的宽度是否允许自动换行 (3)colsline 设置竖线属性引用tpen类 (4)footer 设置明细尾（设置同pagefooter 页脚 pageheader 页眉） (5)frame 设置明细边框属性引用tpen类 (6)head 设置明细头（设置同pagefooter 页脚 pageheader 页眉） (7)rowsline 设置横线属性引用tpen类 (8)rowspace 设置明细行的高度 (9)top 明细与标题的距离 (10)Alignment对齐方式 7、page 设置纸张 (1) leftmargin:real;;左边距 (2) rightmargin:real;;右边距 (3) topmargin:real;;顶边距 (4) bottommargin:real;;底边距 (5) pagesize:TPageSize;;纸张类型 (6) Height:real;;高度 (7) width:real;;宽度 (8) Orientation:TPrinterOrientation;;打印方向注意：设置纸张的宽度和高度需把pagesize设为Custom 8、title 设置标题 (1) Print:boolean;; 是否打印 (2) Text:tstrings;; 内容可设置多行 (3) Font:tfont;;字体 (4) Alignment:talignment;;对齐方式 (5) top:integer;; 距纸张顶部距离 (6) Rowspace:integer;;行距 (7) EveryPage:boolean;;是否每页打印二、控件方法： (1) preview 预览 (2) print 打印 (3) SaveToFile() 保存为报表文件 (4) SaveToStream() 保存为流（然后就可把整个报表存到数据库了很方便哦! ~_~） (5) PrintFile() 打印报表文件 (6) PrintStream() 打印流（流的数据库存取就不用多说了吧） (7) PreviewFile() 预览文件 (8) PreviewStream() 预览流 (9) OptionToStream() 报表的属性保存为流 (10) OptionFromStream() 从流中得到报表属性 (11) OptionPost()在打印期间改变了报表属性，要想立即生效调用此方法。 (12) PaintText(Text:string) 覆盖原有打印的字符，一般在能返回当前打印的内容的事件中使用。（见控件事件）三、控件事件： (1) AfterPrint 打印后 (2) BeforePrint 打印前 (3) OnPrintDetail(RecordNumber: Integer)在打印每一栏明细前触发此事件，返回参数：RecordNumber返回当前打印行数。 (4) OnPrintDetailField(RecordNumber,FieldIndex: Integer;; FieldText: String);; 在打印明细的每个字段都会触发此事件。返回参数：RecordNumber返回当前打印行数。 FieldIndex 字段索引 FieldText字段内容 (5) OnPrintTitle(Row: Integer;; Text: String)打印每行标题都会触发此事件。返回参数：row当前打印的行 Text当前打印的内容 (6) OnPrintColsTitleField(Row, FieldIndex: Integer;; FieldName: String);; 打印列标题字段时触发此事件返回参数：row当前打印的行 FieldIndex当前打印的字段索引 FieldName当前打印的字段名称 (7) OnPrintColsTitle(Row: Integer) 打印每行列标题时触发此事件返回参数：row当前打印的行四、注意事项 (1) text 属性，输入“¦#¦”打印页码值，如果想打印页码可输入“第¦#¦页” 输入“¦RecordCount¦”打印记录数 (2) 不同的打印机，打印和预览效果可能有一点点不同（保证数据打印完全正确一致）。本人用一台针式和一台激光打印机做测试，开始差别较大后经过调试基本一致，不知其他打印机如何。 (3) 纸张大小以及横向、竖向自动适应系统默认也可设置。 (4) 各列的宽度按比例，适应纸张宽度打印。程序设计：吴进昊 E-mail ：jinhaowu@hotmail.com qq ：54254770 2003.01.03

VC/MFC

16,548

社区成员

421,620

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

VC/MFC社区版块或许是CSDN最“古老”的版块了，记忆之中，与CSDN的年龄几乎差不多。随着时间的推移，MFC技术渐渐的偏离了开发主流，若干年之后的今天，当我们面对着微软的这个经典之笔，内心充满着敬意，那些曾经的记忆，可以说代表着二十年前曾经的辉煌……
向经典致敬，或许是老一代程序员内心里面难以释怀的感受。互联网大行其道的今天，我们期待着MFC技术能够恢复其曾经的辉煌，或许这个期待会永远成为一种“梦想”，或许一切皆有可能……
我们希望这个版块可以很好的适配Web时代，期待更好的互联网技术能够使得MFC技术框架得以重现活力，……

试试用AI创作助手写篇文章吧

+ 用AI写文章