02 2019 档案

怎么判断pagecontrol下的TabSheet是否打开还是关闭求答案
摘要:if pagecontrol.activepage=TabSheet1 then是在当前显示页 解决方案 PageControl1.ActivePage 解决方案 case activepageindex 解决方案 PageControl1.TabIndex 也可以判断当前选项是第几项 解决方案 c 阅读全文

posted @ 2019-02-28 15:40 癫狂编程 阅读(309) 评论(0) 推荐(0) 编辑

用Setup Factory7.0怎样打包delphi的BDE?
摘要:BDE打包发布实例操作步骤如下:使用软件:Setup Factory 7.0打包把C:\Program Files\Common Files\Borland Shared中的所有文件和你的开发的应用程序都加上把Borland Shared、Database Engine、DBD、DBExpress四 阅读全文

posted @ 2019-02-28 10:23 癫狂编程 阅读(331) 评论(0) 推荐(0) 编辑

Lazarus 初识
摘要:恢复内容开始 Lazarus 使用 Free Pascal 的编译器,支持 Object Pascal 语言,与 Delphi 高度兼容,并看做后者的自由软件替代品。 Lazarus 下载与安装 我们先去 Lazarus 官网下载 http://www.lazarus-ide.org/ Window 阅读全文

posted @ 2019-02-27 17:48 癫狂编程 阅读(5724) 评论(0) 推荐(0) 编辑

delphi xe 的替代者 Lazarus
摘要:Lazarus的设计目标是应用Free Pascal,所以所有凡是Free Pascal能运行的平台,Lazarus都可以运行。最新版本能运行于Linux,Win32和Mac OS。整个界面的外观和操作和Delphi IDE一样,因此,如果你会使用Delphi的话,用起Lazarus IDE来就一定 阅读全文

posted @ 2019-02-27 17:35 癫狂编程 阅读(5098) 评论(0) 推荐(1) 编辑

delphi执行查询语句时的进度条怎么做
摘要:procedure TForm1.FormCreate(Sender: TObject); begin ADOQuery1.ExecuteOptions := [eoAsyncFetch];//设为异步读取 end; //ADOQuery的OnFetchProgress事件 procedure TF 阅读全文

posted @ 2019-02-27 16:45 癫狂编程 阅读(455) 评论(0) 推荐(0) 编辑

使用 TListView 控件(4)
摘要:本例效果图: 代码文件: 窗体文件: 阅读全文

posted @ 2019-02-27 13:54 癫狂编程 阅读(339) 评论(0) 推荐(0) 编辑

delphi JPG或BMP图片透明显示
摘要:procedure SaveBmpAsIcon(const Bmp: TBitmap; const Icon: string; const SmallIcon: Boolean; const Transparent: Boolean; const X, Y: Integer); // Bmp : Bitmap图片 // Icon : 最终输出的icon文件全路径... 阅读全文

posted @ 2019-02-27 13:00 癫狂编程 阅读(1793) 评论(0) 推荐(0) 编辑

delphi假死线程堵塞解决办法
摘要:Delphi的高效不多说... 俗话说;真正的程序员用C语言,聪明的程序员用Delphi,一点都不假,和C++比它比C++更简单,更容易上手,功能丝毫不逊色C++,比起VB,毫无疑问比VB好多了,重要的是快,高效! 高效的Pascal编译器,强大的数据库支持==....Delphi在进行计算量相当大 阅读全文

posted @ 2019-02-26 20:29 癫狂编程 阅读(826) 评论(0) 推荐(0) 编辑

delphi CheckListBox 添加滚动条
摘要:ScrollBars := ssBoth 阅读全文

posted @ 2019-02-26 20:03 癫狂编程 阅读(688) 评论(0) 推荐(0) 编辑

delphi Timage 加上滚动条方法
摘要:elphi Timage 加上滚动条方法 1:将 Timage 放入 TScrollBox内,即 [1]设image1.parent:= ScrollBox1; [2]在Object Inspector中将 Timage 拖到 TScrollBox上,使之成为子结点 [3]先拖一个TScrollBo 阅读全文

posted @ 2019-02-26 20:02 癫狂编程 阅读(856) 评论(0) 推荐(0) 编辑

Delphi: TMemo垂直滚动条自动显示
摘要:项目中碰到此问题,之前一直没留意,研究一番用上,以做备忘。参考其它解决方法,不尽完美,自试之,达到效果。 直上代码: 阅读全文

posted @ 2019-02-26 19:50 癫狂编程 阅读(612) 评论(0) 推荐(0) 编辑

如何设置Listbox的行间距?
摘要:关于Listbox的问题? 1. 如何设置Listbox的行间距? 2. 如何实现当鼠标点击Listbox时,被选中的那一行在鼠标点击处出现一控件? 也就是怎么计算出被选中的那一行鼠标点击处的绝对坐标位置(X,Y)? abs(ListBox1.Font.Height);就是高度 ListBox1.F 阅读全文

posted @ 2019-02-26 17:43 癫狂编程 阅读(2849) 评论(0) 推荐(0) 编辑

delphi 如何让ScrollBox的内容与滚动条一起实时滚动
摘要:delphi 如何让ScrollBox的内容与滚动条一起实时滚动 拖动滚动条后只有释放鼠标键,ScrollBox的内容才会滚动到实际位置,不爽。请问高人,怎样才能使拖动ScrollBox的滚动条的同时实时滚动内容? 在OBject Inspector 里 将ScrollBox 的 垂直同步实时滚动 阅读全文

posted @ 2019-02-26 17:37 癫狂编程 阅读(3055) 评论(0) 推荐(0) 编辑

界面控件 - 滚动条ScrollBar(对滚动条消息和鼠标消息结合讲的不错)
摘要:界面是人机交互的门户,对产品至关重要。在界面开发中只有想不到没有做不到的,有好的想法,当然要尝试着做出来。对滚动条的扩展,现在有很多类是的例子。 VS2015的代码编辑是非常强大的,其中有一个功能可以把滚动态变成MinMap,可以通过Options->Text Editor->C/C++->Scro 阅读全文

posted @ 2019-02-26 17:27 癫狂编程 阅读(856) 评论(0) 推荐(0) 编辑

让delphi程序不受WINDOWS日期格式的影响
摘要:如果WINDOWS系统的短日期格式为“yyyy/m/d”,执行下面的代码会报错:2013-01-29 00:00:00不是合法的日期procedure TFrmQuerySale.FormShow(Sender: TObject);varsDate: string;begininherited;// 阅读全文

posted @ 2019-02-26 17:03 癫狂编程 阅读(224) 评论(0) 推荐(0) 编辑

delphi中locate方法
摘要:TDataSet控件以及它的继承控件,例如TSimpleDataSet/TClientDataSet等都可以使用Locate方法在结果数据集中查寻数据。程序首先必须使用SQL命令从后端数据库中取得数据并且形成结果数据集,然后才使用Locate方法查寻数据。当使用Locate方法查寻数据时,开发人员可 阅读全文

posted @ 2019-02-26 12:47 癫狂编程 阅读(1513) 评论(0) 推荐(0) 编辑

delphi checklistbox用法
摘要:在Delphi中checklistbox中高亮选中(不论是否Checked)能够进行操作么?删除,上下移动等等 删除:CheckListBox.DeleteSelected; 上下移: CheckListBox.Items.Move 删除用 CheckListBox1.Items.Delete(In 阅读全文

posted @ 2019-02-26 12:00 癫狂编程 阅读(1651) 评论(0) 推荐(0) 编辑

Delphi字符串转日期,强大到窒息,VarToDateTime解决了困扰很久的小问题
摘要:procedure THRForm.Button1Click(Sender: TObject); var D:TDateTime; s:string; begin D:=VarToDateTime('05-10-14 04:35PM'); S:=FormatDatetime('YYYY-MM-DD HH:MM:SS',D); showmessage(s); end; 尤其是... 阅读全文

posted @ 2019-02-26 11:36 癫狂编程 阅读(6012) 评论(0) 推荐(0) 编辑

DELPHI 字符串与日期格式互转
摘要:看到有人这样用VarToDateTime、存下来、强大的日期通杀 阅读全文

posted @ 2019-02-26 11:34 癫狂编程 阅读(4534) 评论(0) 推荐(0) 编辑

继承Tcalendar控件,让当天日期醒目显示
摘要:一、新建一控件 打开Delphi主菜单Cpmponent—New Cpmponent: 二、配置参数 点击OK键,打开Unit单元文件。 三、修改单元文件 unit LyCalendar; interface uses Windows, Messages, SysUtils, Variants, C 阅读全文

posted @ 2019-02-25 19:22 癫狂编程 阅读(399) 评论(0) 推荐(0) 编辑

TLabel的FocusControl属性什麽意思
摘要:但我们为Label设置了热键的时刻,我们按这个热键,就会移动核心倒FocusControl指定的控件上!例如,设置Label.Caption:='Test For FocusControl(&F)',Label.FocusControl-->Edit1,那么当我们按Alt+F的时刻,Edit1就会获 阅读全文

posted @ 2019-02-25 19:16 癫狂编程 阅读(405) 评论(0) 推荐(0) 编辑

Delphi Try Except 实例
摘要://判断单位转换率 try um_rate := vp_mstr.F('vp_um_rate_d').AsFloat / vp_mstr.F('vp_um_rate_m').AsFloat; if um_rate 1) then abort else if (vp_mstr.F('vp_um').AsString vp_mstr.F('part_um'... 阅读全文

posted @ 2019-02-25 18:23 癫狂编程 阅读(156) 评论(0) 推荐(0) 编辑

如何有效地让一个“ParentFont = False”子控件使用与父母相同的字体名称?
摘要:如何有效地让一个“ParentFont = False”子控件使用与父母相同的字体名称?(How to efficiently let a `ParentFont = False` child control to use same font name as parent?) 问 题 Most VC 阅读全文

posted @ 2019-02-25 18:17 癫狂编程 阅读(555) 评论(0) 推荐(0) 编辑

窗体的构造函数和OnCreate事件
摘要:窗体的构造函数和创建事件和OldCreateOrder属性有很大的关系。 情况1: 如果窗体继承自TForm,且有如下形式: 1. constructor TForm1.Create(AOwner: TComponent); 2. begin 3. inherited; 4. Button1.Cap 阅读全文

posted @ 2019-02-25 17:44 癫狂编程 阅读(564) 评论(0) 推荐(0) 编辑

用友时空KSOA功能挖掘之zl_func函数
摘要:问题日常开发中,需要对界面进行控制,不符合条件时禁用某些功能菜单。例如【采购订单填制】界面,要实现供应商资质证书效期提醒功能,即近效期提醒,超效期禁止采购,如何实现呢? 分析使用KSOA新增加的zl_func函数,可以实现单据界面交互控制要求。先编写资料检索方案,再在表单的域执行函数调用检索方案。 阅读全文

posted @ 2019-02-24 19:24 癫狂编程 阅读(901) 评论(0) 推荐(0) 编辑

Delphi cxGrid加行号
摘要:如果你不要行标志的话,你可以不改控件 直接注释掉这一行: ASender.LookAndFeelPainter.DrawIndicatorImage(ACanvas, ATextRect, AIndicatorViewInfo.IndicatorKind); 要标志的话,在DrawIndicator 阅读全文

posted @ 2019-02-24 00:06 癫狂编程 阅读(712) 评论(0) 推荐(0) 编辑

delphi clientdataset判断某一行值是否存在
摘要:ClientDataSet的数据查找。我所介绍的心得和技巧都是用ClientDataSet来做范例,也可以应用于其他的一些DataSet。废话就不多说了。我们还是先看代码,让后再总结。1.Scanning 扫描数据查找这是最简单最直接也是最慢的一种方法,遍历所有数据:procedure TForm1 阅读全文

posted @ 2019-02-23 23:03 癫狂编程 阅读(406) 评论(0) 推荐(0) 编辑

DELPHI 数据集在内存中快速查询方法
摘要:1、Bookmark var p:pointer; procedure TForm1.Button1Click(Sender: TObject);//加个标签 begin p:=cxGrid1DBTableView1.DataController.DataSet.GetBookmark; end; 阅读全文

posted @ 2019-02-21 23:56 癫狂编程 阅读(1006) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-16 01:43 癫狂编程 阅读(387) 评论(0) 推荐(0) 编辑

KSOA单据保护表中Clientid解析为mac和ip
摘要:SELECT DISTINCT a.*,ISNULL(c.client_net_address,'') AS client_net_address FROM ( SELECT * ,RIGHT(UPPER(sys.fn_varbintohexstr(CONVERT(VARBINARY(4),CAST(SUBSTRING(clientid,1,3) AS INT... 阅读全文

posted @ 2019-02-15 10:45 癫狂编程 阅读(382) 评论(0) 推荐(0) 编辑

delphi 控件的名称怎么不显示了
摘要:选择菜单 Tools--Environment在打开的对话框中选择 Designer 页,选 其中的 Options 选项勾选 Show component captions ,点击 OK即可 阅读全文

posted @ 2019-02-14 13:33 癫狂编程 阅读(556) 评论(0) 推荐(0) 编辑

DBGrid添加行号编写笔记
摘要:procedure TForm1.ClientDataSet1NewRecord(DataSet: TDataSet); begin ShowMessage('你好'); ClientDataSet1.First; while not ClientDataSet1.Eof do begin ClientDataSet1.Edit; ClientDataSet1.F... 阅读全文

posted @ 2019-02-14 00:03 癫狂编程 阅读(170) 评论(0) 推荐(0) 编辑

动态SQL的执行,注:exec sp_executesql 其实可以实现参数查询和输出参数的
摘要:当需要根据外部输入的参数来决定要执行的SQL语句时,常常需要动态来构造SQL查询语句,个人觉得用得比较多的地方就是分页存储过程和执行搜索查询的SQL语句。一个比较通用的分页存储过程,可能需要传入表名,字段,过滤条件,排序等参数,而对于搜索的话,可能要根据搜索条件判断来动态执行SQL语句。 在SQL 阅读全文

posted @ 2019-02-13 16:08 癫狂编程 阅读(462) 评论(0) 推荐(0) 编辑

dbgrid控件如何能在左边显示行号?
摘要:procedure TMSWageEdit.aqyMSWageEditCalcFields(DataSet: TDataSet);begin inherited; with DataSet do if RecNo =-1 then FieldByName('计算字段').AsInteger := 1 阅读全文

posted @ 2019-02-13 14:56 癫狂编程 阅读(369) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-13 13:21 癫狂编程 阅读(1400) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-13 02:04 癫狂编程 阅读(356) 评论(0) 推荐(0) 编辑

用ClientDataSet更新数据表,怎样自动生成行号? [问题点数:40分]
摘要:ClientDataSet.First;while not ClientDataSet.eof dobegin ClientDataSet.edit; ClientDataSet.FieldByName('行号字段').asInteger := ClientDataSet.RecNo; Client 阅读全文

posted @ 2019-02-13 01:55 癫狂编程 阅读(193) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-13 01:50 癫狂编程 阅读(324) 评论(0) 推荐(0) 编辑

delphi如何检索adoquery里面某一列存在的重复行?
摘要: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... 阅读全文

posted @ 2019-02-12 23:06 癫狂编程 阅读(563) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-12 12:51 癫狂编程 阅读(264) 评论(0) 推荐(0) 编辑

dbgrid如何在最左边的列上显示行序号
摘要:procedure TForm1.Table1CalcFields(DataSet: TDataSet); begin table1.FieldValues['no']:=table1.RecNo; end; //聲明全局變量i procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; ... 阅读全文

posted @ 2019-02-12 00:02 癫狂编程 阅读(563) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-11 23:53 癫狂编程 阅读(363) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-10 15:53 癫狂编程 阅读(1061) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-10 15:49 癫狂编程 阅读(377) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-10 15:38 癫狂编程 阅读(867) 评论(0) 推荐(0) 编辑

delphi的ActionToolBar控件的使用 [问题点数:50分]
摘要:delphi那些默认图标在哪里就是那些Text,Label,Checkbox,显示在palette上面的那些图标。 上面的按钮是在ActionManager中添加的,让后拖到ActionToolBar上面的,类型是TAction 阅读全文

posted @ 2019-02-10 12:03 癫狂编程 阅读(537) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-09 01:28 癫狂编程 阅读(432) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-07 16:27 癫狂编程 阅读(773) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-05 22:19 癫狂编程 阅读(1873) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-05 21:48 癫狂编程 阅读(776) 评论(0) 推荐(0) 编辑

delphi手动创建dataset并插入值
摘要:unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, V 阅读全文

posted @ 2019-02-05 13:14 癫狂编程 阅读(1100) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-04 15:45 癫狂编程 阅读(528) 评论(0) 推荐(0) 编辑

keydown和KeyPress事件有何不同
摘要:KEYPRESSWhen a windowed control receives a key-press message (WM_CHAR) from Windows, its message handler calls the DoKeyPress method.说明:响应WM_CHAR消息,不包 阅读全文

posted @ 2019-02-04 11:20 癫狂编程 阅读(446) 评论(0) 推荐(0) 编辑

Delphi : keydown与keypress的区别,组合键
摘要:Shift 是一个集合变量。 type TShiftState = set of (ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble); 也就是说TShiftstate类型有ssShift, ssAlt, ssCtrl, ssLe 阅读全文

posted @ 2019-02-04 11:16 癫狂编程 阅读(594) 评论(0) 推荐(0) 编辑

(很难啊)如何实时获取DBGrid 中当前单元格输入的内容? [问题点数:100分,结帖人yifawu100]
摘要:如何获取DBGrid 中当前单元格输入的内容?还没输入完成,我想实时获取 Cell中的内容,以便作其他处理,用什么事件呢? 所以Field的Onchange事件是没用的。 DBGrid1.SelectedField.AsStringDBGrid1.SelectedField.Text看你需要选择 这 阅读全文

posted @ 2019-02-03 19:07 癫狂编程 阅读(205) 评论(0) 推荐(0) 编辑

Delphi 获取临时数据集 ClientDataSet
摘要:function GetcdsAccountsData: OleVariant; var ASQLQuery: TSQLQuery; Adsp: TProvider; begin ASQLQuery:=CreateSQLQuery; Adsp:=TProvider.Create(nil); with ASQLQuery do try SQL... 阅读全文

posted @ 2019-02-03 19:03 癫狂编程 阅读(767) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-03 18:56 癫狂编程 阅读(841) 评论(0) 推荐(0) 编辑

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

posted @ 2019-02-03 17:57 癫狂编程 阅读(581) 评论(0) 推荐(0) 编辑

如何判断数据集中记录是否发生改变(50分)
摘要:使用Delphi7+ADO,如何得知数据集是否发生了改变,即是否有记录值改变,或删除记录,或新增记录,目的是在关闭相关窗口时,提示用户保存数据 if adotable1.Modified then{//提示保存} if state in [dsinsert,dsedit] thenbeginend; 阅读全文

posted @ 2019-02-03 17:26 癫狂编程 阅读(547) 评论(0) 推荐(0) 编辑

delphi adoquery的post和UpdateBatch
摘要:delphi adoquery的post和UpdateBatch Post是确认当前的修改,而UpdateBatch是把已经确认但是没有存盘的数据写入数据库当ADOQuery的CursorType是ctKeySet或者ctStatic,并且LockType是ltBatchOptimistic的时候, 阅读全文

posted @ 2019-02-02 17:39 癫狂编程 阅读(1047) 评论(0) 推荐(0) 编辑

UpdateBatch与事务处理的一点总结
摘要:对于某些设置或者提交,如果希望是全部修改完毕后才确定生效,可以将DataSet的LockType:=ltBatchOptimistic,这样就可以了。然后每次做的修改和改动都暂时保存在缓存中,必须通过UpdateBatch来提交入库。可以通过判断DataSet的UpdateStatus属性是否为us 阅读全文

posted @ 2019-02-02 17:38 癫狂编程 阅读(222) 评论(0) 推荐(0) 编辑

UpdateBatch到底是怎么用的?
摘要:要使用ADOQuery的UpdateBatch函数,必须将ADOQuery的LockType属性设置成ltBatchOptimistic 阅读全文

posted @ 2019-02-02 17:36 癫狂编程 阅读(1742) 评论(0) 推荐(0) 编辑

怎样使用ADO中的UpdateBatch方法(200分)
摘要:诸位: 我在使用ADO组件(ADOQuery、ADODataSet)的BatchUpdate模式时,系统竟不认识UpdateBatch、CancelBatch方法。这是怎么回事?我的运行环境是Win2000+SQL2000+D5.使用时对着李维的(Delphi 5.x ADO/MTS/com+)书第 阅读全文

posted @ 2019-02-02 17:32 癫狂编程 阅读(1086) 评论(0) 推荐(0) 编辑

谁能告诉delphi7 的updatebatch使用属性说明?
摘要:谁能告诉delphi7 的updatebatch使用属性说明? ADODataSet1.UpdateBatch(arAll); 就是提交你的数据集到数据库 阅读全文

posted @ 2019-02-02 17:23 癫狂编程 阅读(679) 评论(0) 推荐(0) 编辑

delphi ERP框架
摘要:之前做c/s架构,接了有家装饰的一个ERP项目,做了一个ERP框架,现在转后端开发了,这些东西还是蛮怀念的,就开源出来吧,有需要的同学可以参考。 https://github.com/qianlnk/LnkSys 为了方便开发和团队合作,采用dll做动态库,数据库中读取菜单项动态加载对应菜单的模块。 阅读全文

posted @ 2019-02-02 15:57 癫狂编程 阅读(1309) 评论(0) 推荐(0) 编辑

时空表单函数名称
摘要:函数名称:CloseBill 类型:bill 中文类型:平台函数 中文名称:关闭表单 格式:CloseBill() 说明:相当于单据类的exitbill 函数名称:DelBill 类型:bill 中文类型:平台函数 中文名称:将beactive字段设置为'否' 格式:DelBill() 说明:根据表 阅读全文

posted @ 2019-02-02 14:04 癫狂编程 阅读(1679) 评论(0) 推荐(0) 编辑

javascript定时保存表单数据的代码
摘要:(忘记是不是两家邮箱都有这个功能)。 那这个功能是怎么做的呢? 定时,我们知道怎么弄,但保存呢?也许我们会通过隐藏域等手段来存放数据。但是,这个却有个缺点:那就是刷新页面后,数据将会丢失。 而此时,就该轮到我们很少关注,而且估计有不少人不知道的UserData 行为(userData Behavio 阅读全文

posted @ 2019-02-02 14:00 癫狂编程 阅读(252) 评论(0) 推荐(0) 编辑

时空KSOA之CS表单工具说明
摘要:CS表单工具说明 1、调用: 1.1、单据事件调用 runbill_表单sn 调用无窗口表单 loadbill_表单sn 调用窗口表单 1.2、功能调用 功能号:LOADCSBILL 参数表单名称 1.3、表单中调用表单 OPENBILL_表单sn 2、对象 2.1、DJForm: // 特指单据调 阅读全文

posted @ 2019-02-02 13:58 癫狂编程 阅读(2054) 评论(0) 推荐(0) 编辑

用友时空B/S表单外挂(接口)程序操作说明文档
摘要:用友时空B/S表单外挂(接口)程序 一、B/S表单接口需求 众所周知,用友时空KSOA支持B/S架构。且移动商务、在线门店,都是完全基于B/S架构的。 B/S架构的优越性在于没有本地客户端和本地数据,实施部署简单且后续维护简单。而劣势则在于与第三方接口很麻烦,特别是需要在本地进行对接时。 例如,PO 阅读全文

posted @ 2019-02-02 13:52 癫狂编程 阅读(2042) 评论(0) 推荐(0) 编辑

导航

< 2025年2月 >
26 27 28 29 30 31 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 1
2 3 4 5 6 7 8
好的代码像粥一样,都是用时间熬出来的
点击右上角即可分享
微信分享提示