癫狂编程

摘要： 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:= 阅读全文

摘要： 路径指文件存放的位置，在网页中利用路径可以引用文件，插入图像、视频等。表示路径的方法有两种：相对路径，绝对路径。以下讨论均是在HTML环境下进行。 相对路径 相对路径是指目标相对于当前文件的路径，网页结构设计中多采用这种方法来表示目标的路径。相对路径有多种表示方法，其表示的意义不尽相同。表示方法如下 阅读全文

摘要： 关于Delphi内存表的使用说明：1.建立临时表 数据输入是开发数据库程序的必然环节。在Client/Server结构中，客户端可能要输入一批数据后，再向服务器的后台数据库提交，这就需要在本地（客户端）建立临时数据表来存储用户输入的数据，待提交后，清除本地表数据。2 建立临时表如下：function 阅读全文

摘要： 一、概述 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 阅读全文

摘要： 数据源记录集：ClientDataSetSource；目标记录集：ClientDataSetCopy 1）复制一条记录。 ClientDataSetCopy.Close; ClientDataSetCopy.Fields.Clear; ClientDataSetCopy.FieldDefs.Clea 阅读全文

摘要： KEYPRESSWhen a windowed control receives a key-press message (WM_CHAR) from Windows, its message handler calls the DoKeyPress method.说明：响应WM_CHAR消息，不包 阅读全文

摘要： Shift 是一个集合变量。 type TShiftState = set of (ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble); 也就是说TShiftstate类型有ssShift, ssAlt, ssCtrl, ssLe 阅读全文

摘要： 如何获取DBGrid 中当前单元格输入的内容？还没输入完成，我想实时获取 Cell中的内容，以便作其他处理，用什么事件呢？ 所以Field的Onchange事件是没用的。 DBGrid1.SelectedField.AsStringDBGrid1.SelectedField.Text看你需要选择 这 阅读全文

摘要： function GetcdsAccountsData: OleVariant; var ASQLQuery: TSQLQuery; Adsp: TProvider; begin ASQLQuery:=CreateSQLQuery; Adsp:=TProvider.Create(nil); with ASQLQuery do try SQL... 阅读全文

摘要： 1、 需要2个ClientDataSet组件； 2、 clientDataSet1连接目标表，clientDataSet2连接源表，如果无法直接连接，使用DataSetProvider进行桥接； 3、 复制clientDataSet2结构到clientDataSet1； for I := 0 to 阅读全文

摘要： 1、TClientDataSet控件 通过TClientDataSet控件可以建立瘦客户端的应用程序，且数据执行效率较高，但它不能和数据库自动连接，程序中必须制定它如何获取数据。一般情况下，TClientDataSet 控件获取数据的方式主要有 3 种：从本地文件中获取、从本地的另外一个数据集对象中 阅读全文