摘要：1、Bookmark var p:pointer; procedure TForm1.Button1Click(Sender: TObject);//加个标签 begin p:=cxGrid1DBTableView1.DataController.DataSet.GetBookmark; end; 阅读全文

摘要：TClientDataSet 中计算字段有两种: Calculated(计算字段)、InternalCalc(内部计算字段).两者区别是: Calculated 在每次需要时都要重新计算; InternalCalc 只需要计算一次.Calculated 需要计算的时间, InternalCalc 需 阅读全文

摘要：选择菜单 Tools－－Environment在打开的对话框中选择 Designer 页，选 其中的 Options 选项勾选 Show component captions ，点击 OK即可 阅读全文

摘要：procedure TForm1.ClientDataSet1NewRecord(DataSet: TDataSet); begin ShowMessage('你好'); ClientDataSet1.First; while not ClientDataSet1.Eof do begin ClientDataSet1.Edit; ClientDataSet1.F... 阅读全文

摘要：procedure TMSWageEdit.aqyMSWageEditCalcFields(DataSet: TDataSet);begin inherited; with DataSet do if RecNo =-1 then FieldByName('计算字段').AsInteger := 1 阅读全文

摘要：软件提示“没有活动事务”，原因：使用事务时 Trydm.ADOConnection1.BeginTrans;1、 sql语句 dm.ADOConnection1.CommitTrans; 2、 代码出现异常 excetp dm.ADOConnection1.RollbackTrans;end;如上所 阅读全文

摘要：我们有一个Delphi的数据库应用程序,上面有个DBGrid和一个数据集： DBGrid是用来显示来自数据集（查询或表）的数据，根据设计,当您调用已经打开的数据集的Refresh方 法（例如使用DBNavigator的Refresh），当前行的位置将被设置为0 （第一个记录）。 这意味着，如果用户选 阅读全文

摘要：ClientDataSet.First;while not ClientDataSet.eof dobegin ClientDataSet.edit; ClientDataSet.FieldByName('行号字段').asInteger := ClientDataSet.RecNo; Client 阅读全文

摘要：DBGrid使用起来还是很方便的，但就是没有显示记录序号的功能，必须自己加，参照老外给的解决方案如下： 方案1： 1- 在DBGrid建一个第一列 (列的名字起“NO”) 2- 在DBGrid事件 DrawColumnCell 下加如下代码 阅读全文

摘要：var IsHave:Boolean; begin adoquery.first; while(not adoquery.eof) do begin if(adoquery.fieldbyname('列名').asstring="用户添加的值") then begin IsHave=True; break; end; adoquery.next; end; if(IsHav... 阅读全文

摘要：在 win7下可能报错请大家按下面的方式 delphi7运行不正常的提示unable to rename'c:\program files\Borland\delphi7\Bin\delphi32.$$$'to'c:\program files\Borland\delphi7\Bin\delphi3 阅读全文

摘要：procedure TForm1.Table1CalcFields(DataSet: TDataSet); begin table1.FieldValues['no']:=table1.RecNo; end; //聲明全局變量i procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; ... 阅读全文

摘要：ClientDataSet字段不能进行编辑时的解决方法： procedure ModifyClientDataSet(const YesOrNot: Boolean; cs : TClientDataSet);var i : Integer;begin // 当 YesOrNot 为 true 时为 阅读全文

摘要：以下不保存证正确 Query用SQL语言执行过的，没有必要Cancel、Post，因为其会对数据库直接操作；执行Update、Insert、Delete请用SQL语句； 用Table使用对当前记录直接操作，也许会有用，Cance、Post会起作用；执行Update、Insert、Delete，可对当 阅读全文

摘要：本论文主要是通过三天来讲解三层的结构，今天是第一天，先讲解一下delphi下的Models层，我主要封装了两个查询得到数据集的函数，主要是通过在表示层上创建的数数据集控件传递进来，通过业务逻辑对语句的处理进行操作数据集，最后提交数据集的数据到数据库中去，进而想成delphi中的假三层，这样做能够独立 阅读全文

摘要：ADOquery属性中cursortype属性 2009-03-24 8:47 ctOpenForwardOnly 向前移动 - — 除了只能在记录集中向前移动以外，其它的和动态游标类似。 ctKeyset 键集 – 不允许查看其他用户添加的记录和访问其他用户删除的记录。 ctDynamic 动态 阅读全文

摘要：delphi那些默认图标在哪里就是那些Text,Label,Checkbox，显示在palette上面的那些图标。 上面的按钮是在ActionManager中添加的，让后拖到ActionToolBar上面的，类型是TAction 阅读全文

摘要：序号的自动生成1.定义变量 private maxno:integer; public bmodified:boolean;2.写函数 function max(const a,b:integer):integer; begin if a>b then result:=a else result:= 阅读全文

摘要：一、概述 Delphi作为Windows下的一种快速开发工具，不仅能开发一般的Windows应用程序，而且还具有强大的数据库应用程序开发功能。Delphi本身提供了对BDE，ODBC，ADO和InterBase几种数据库驱动的支持，能够满足不同应用对数据库程序开发的需要。 然而，在发布用Delphi 阅读全文

摘要：unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, V 阅读全文