03 2019 档案

delphi中 dataset容易出错的地方
摘要:最近写delphi项目,用到的数据集中的dataset,一直修改exception啊,写下过程。 在对数据集进行任何操作之前,首先要打开数据集。要打开数据集,可以把Active属性设为True,例如: CustTable.Active := True; 也可以调用Open函数,例如:CustQuer 阅读全文

posted @ 2019-03-31 17:34 癫狂编程 阅读(339) 评论(0) 推荐(0) 编辑

Ehlib(Delphi控件) v9.2.024 D7-XE10.2 免费绿色特别版
摘要:下载地址:https://www.jb51.net/softs/579413.html#downintro2 EHLib是一个DELPHI 下的非常棒的第三方Grid控件,比DELPHI自带的强大许多,但又比cxGrid小巧。适合做一些比较轻量级的桌面应用。 使用方法: Delphi 控件EhLib 阅读全文

posted @ 2019-03-31 16:53 癫狂编程 阅读(1091) 评论(0) 推荐(0) 编辑

Delphi (Library Path Browsing Path)
摘要:首先要明白的一个概念是dcu文件 *.dcu是*.pas的编译后单元文件(Delphi Compiled Unit), 编译器把它和库文件连接起来就构成了可执行文件*.exe 或*.dll等,相当于C中的obj文件。你所说的AgentObjects_TLB.dcu文件不一定在你的机器存在过它很可能是 阅读全文

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

delphi按钮控件的default属性
摘要:delphi按钮控件的default属性用于设置默认命令按钮,.设置为true时,按[Enter键]相当于用鼠标单击了该按钮 .窗口中如果有多个按钮的default是true的话,就根据tabindex顺序来决定是哪个来响应enter ,修改其TabIndex=0即可.这个用于密码登录页面比较人性化 阅读全文

posted @ 2019-03-30 07:37 癫狂编程 阅读(602) 评论(0) 推荐(0) 编辑

如何判断数据集中记录是否发生改变(50分)
摘要:使用Delphi7+ADO,如何得知数据集是否发生了改变,即是否有记录值改变,或删除记录,或新增记录,目的是在关闭相关窗口时,提示用户保存数据 if adotable1.Modified then{//提示保存} 我用的是事务提交,所以不能只判断当前记录的状态 if state in [dsinse 阅读全文

posted @ 2019-03-29 14:40 癫狂编程 阅读(586) 评论(0) 推荐(0) 编辑

Delphi 限制Edit输入 多个例子
摘要:procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if not (key in [ '.',#8]) then key:=#0; //只能输入小数点end; procedure TForm1.Edit1KeyP 阅读全文

posted @ 2019-03-29 13:38 癫狂编程 阅读(945) 评论(0) 推荐(0) 编辑

Delphi数据集与记录
摘要:1.1Delphi数据库应用程序的层次结构 Delphi数据库应用程序通过数据存取构件对数据库进行访问,通过可视的数据构件(Data Control)将数据呈现给用户,并与用户进行交互。Delphi数据库应用程序的结构如下图: 图 2‑1 Delphi数据库应用程序结构图 Delphi访问数据库可以 阅读全文

posted @ 2019-03-28 21:27 癫狂编程 阅读(2089) 评论(0) 推荐(0) 编辑

取得数据表中前N条记录,某列重复的话只取第一条记录
摘要:项目需要筛选出不重复数据,以前没有做过,第一反应就是利用distinct处理,但是弄了好久也没搞出来,大家有知道的望告知下。 这次筛选没有使用distinct ,是利用group by ,利用id为唯一标示符(自增长),对按user进行排列,然后取重复项最小id(非重复项直接取唯一id),并以此id 阅读全文

posted @ 2019-03-28 21:18 癫狂编程 阅读(606) 评论(0) 推荐(0) 编辑

delphi怎样在关闭程序时弹出窗口?
摘要:我想在关闭delphi编译的程序时,弹出“您是否确实要退出的窗口”点击否不退出,是退出 在主窗体的CloseQuery事件里,使用messagebox进行提示,根据选择的按钮对Canclose进行设置就可以了 如 begin if messagebox(handle, '是否退出程序', '提示', 阅读全文

posted @ 2019-03-28 13:57 癫狂编程 阅读(529) 评论(0) 推荐(0) 编辑

adoquery怎样判断数据在缓存中有修改啊
摘要:ADOQry.Filtered:=false; ADOQry.Filtered:=true; ADOQry.FilterGroup:=fgPendingRecords ;FilterGroup参数解释如下:FgUnassigned 指定不使用任何的过滤器来过滤数据fgNone 移去任何的过滤器,让所 阅读全文

posted @ 2019-03-28 13:25 癫狂编程 阅读(413) 评论(0) 推荐(0) 编辑

DataSet 取值,DataSet行数,DataSet列数 从DataSet中取出特定值
摘要:1 DataSet.Table[0].Rows[ i ][ j ] 其中i 代表第 i 行数, j 代表第 j 列数 2 DataSet.Table[0].Rows[ i ].ItemArray[ j ] 其中i 代表第 i 行数, j 代表第 j 列数 3 DataSet.Tables[0].Co 阅读全文

posted @ 2019-03-28 10:48 癫狂编程 阅读(1309) 评论(0) 推荐(0) 编辑

获取DataSet中某行某列的数据
摘要:LabelText = DataSet11.Tables("COMM.USERS").Rows[0]["User_Name"].tostring() LabelText = DataSet11.Tables("COMM.USERS").Rows(0).Item("user_name") Label. 阅读全文

posted @ 2019-03-28 10:43 癫狂编程 阅读(1310) 评论(0) 推荐(0) 编辑

如何快速定位到DBGrid的某一行!!!急...
摘要:比如我查找张三,那么DBGrid就可以定位到张三那行并选中这行,除了用循环实现还有没有快速定位的方法,谢谢! 解决方案 » to SuperTitan001 那如何找到张三的这行呢?除了用循环还有什么快速找到这行的方法吗? 最简单的dbgrid1.datasource.dataset.locate( 阅读全文

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

delphi 中出现dataset not in edit or insert mode的问题
摘要:self.ADOQuery2.Edit;self.ADOQuery2.First;while not self.ADOQuery2.Eof dobeginself.ADOQuery2.FieldByName('单价').Value:=roundto(self.ADOQuery2.FieldByNam 阅读全文

posted @ 2019-03-28 03:49 癫狂编程 阅读(3373) 评论(0) 推荐(0) 编辑

Delphi调用MSSQL存储过程返回的多个数据集的方法
摘要:varaintf:_Recordset;RecordsAffected:OleVariant; begin ADOStoredProc1.Close;ADOStoredProc1.Open;aintf:=ADOStoredProc1.Recordset;ADOQuery1.Recordset:=ai 阅读全文

posted @ 2019-03-27 22:56 癫狂编程 阅读(810) 评论(0) 推荐(0) 编辑

SQL Server与SQL Server Express的区别
摘要:SQL Server Express 2005(以下简称 SQLExpress) 是由微软公司开发的 SQL Server 2005(以下简称 SQL2005)的缩减版,这个版本是免费的,它继承了 SQL Server 2005 的多数功能与特性,如:安全性设置、自定义函数和过程、Transact- 阅读全文

posted @ 2019-03-26 21:32 癫狂编程 阅读(16126) 评论(0) 推荐(1) 编辑

SQL Server中的完全连接(full join)
摘要:一、建库和建表 二、完全连接的用法 结果集中包含三部分内容: 实例演示: 两张表连接: 三张表连接: 阅读全文

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

DELPHI中MDI子窗口的关闭 和打开
摘要:Delphi中MDI子窗口的关闭方式默认为缩小而不是关闭,所以当你单击子窗口右上角的关闭按钮时会发觉该子窗口只是最小化,而不是你预期的那样被关闭。解决办法是在子窗口的OnClose事件处理过程中加入如下代码,示例:procedure ChildForm.OnClose(Sender: TObject 阅读全文

posted @ 2019-03-26 11:46 癫狂编程 阅读(644) 评论(0) 推荐(0) 编辑

FormDestroy 和 FormClose 有什么区别和联系?
摘要:1.窗口的所有资源真正释放时调用 FormDestroy。当你关闭窗口时,VCL会调用FormClose,如果你在FormClose里写Action = caFree,那么VCL会继续调用FormDestroy;如果你将Action的值赋为其它任何值,VCL不会真正释放窗口资源(如果Action=c 阅读全文

posted @ 2019-03-26 11:41 癫狂编程 阅读(627) 评论(0) 推荐(0) 编辑

delphi 怎么实现主窗口退出时,有一个提示框?
摘要:无论点窗口上的【按钮】还是【右上角的叉】,能出现一个提示窗口,“是”-退出窗口,“否”-重新登录(调出登录窗口),“取消”-返回。MessageBox能实现吗?还是要调用新窗口(我调用窗口,有些错误)?如图一样。 有谁能给代码?谢谢了热心网友:你好,我用你的代码,已经好了。但用在 procedure 阅读全文

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

Delphi MDI 子窗体的创建和销毁 [zhuan]
摘要:1.如果要创建一个mdi child,先看是否有这个child 存在,如果有,则用它,如果没有再创建 //该函数判断MDI 子窗体是否存在,再进行创建和显示function isInclude(formclass: TFormClass): boolean;var i: Integer; form: 阅读全文

posted @ 2019-03-26 11:33 癫狂编程 阅读(358) 评论(0) 推荐(0) 编辑

delphi中退出是弹出让你确定的几种确定对话框怎么写?
摘要:运行效果截图: 阅读全文

posted @ 2019-03-26 11:30 癫狂编程 阅读(494) 评论(0) 推荐(0) 编辑

delphi 子窗体只能最小化不能关闭的解决方案
摘要:cnpack下载地址:http://www.cnpack.org/showdetail.php?id=726&lang=zh-cn 时候创建的子窗体不能关闭,点关闭按钮时子窗体最小化了。 出现这种情况的时候可在窗体的 onClose 事件 中加入 Action := caFree; 即可; 例: p 阅读全文

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

SQL之case when then用法
摘要:case具有两种格式。简单case函数和case搜索函数。 这两种方式,可以实现相同的功能。简单case函数的写法相对比较简洁,但是和case搜索函数相比,功能方面会有些限制,比如写判定式。 还有一个需要注重的问题,case函数只返回第一个符合条件的值,剩下的case部分将会被自动忽略。 下面实例演 阅读全文

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

SQL之CASE WHEN用法详解[1]
摘要:简单CASE WHEN函数: 等同于,使用CASE WHEN条件表达式函数实现: THEN后边的值与ELSE后边的值类型应一致,否则会报错。如下: '优'和0数据类型不一致则报错: [Err] ORA-00932: 数据类型不一致: 应为 CHAR, 但却获得 NUMBER 简单CASE WHEN函 阅读全文

posted @ 2019-03-25 16:46 癫狂编程 阅读(1644) 评论(0) 推荐(0) 编辑

[SQL case when的两种用法]
摘要:当我们需要从数据源上 直接判断数据显示代表的含义的时候 ,就可以在SQL语句中使用 Case When这个函数了. Case具有两种格式。简单Case函数和Case搜索函数。 第一种 格式 : 简单Case函数 : 格式说明 case 列名 when 条件值1 then 选择项1 when 条件值2 阅读全文

posted @ 2019-03-25 16:20 癫狂编程 阅读(1008) 评论(0) 推荐(0) 编辑

在delphi中生成GUID
摘要:什么是 GUID ? 全球唯一标识符 (GUID) 是一个字母数字标识符,用于指示产品的唯一性安装。在许多流行软件应用程序(例如 Web 浏览器和媒体播放器)中,都使用 GUID。 GUID 的格式为8-4-4-4-12 :“xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx” 阅读全文

posted @ 2019-03-25 06:41 癫狂编程 阅读(1392) 评论(0) 推荐(0) 编辑

在delphi中生成GUID/自动获取临时表名......
摘要:什么是 GUID ? 全球唯一标识符 (GUID) 是一个字母数字标识符,用于指示产品的唯一性安装。在许多流行软件应用程序(例如 Web 浏览器和媒体播放器)中,都使用 GUID。 GUID 的格式为8-4-4-4-12 :“xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx” 阅读全文

posted @ 2019-03-25 06:34 癫狂编程 阅读(592) 评论(0) 推荐(0) 编辑

Delphi中Owner和Parent的区别
摘要:Owner为创建者,Parent为容器 他们的类型不同,Owner为TComponent(元件),Parent为TWinControl(窗体控件) Parent属性是指构件的包容器,构件只能在此范围内显示和移动。举例子如下:(1)在Form1的窗体上,放一个Panel1,并将Panel1拉大,(2) 阅读全文

posted @ 2019-03-25 05:22 癫狂编程 阅读(617) 评论(0) 推荐(0) 编辑

Delphi处理数据网格DBGrid的编辑框 获取还没有提交到数据集的字段文本
摘要://fromhttp://kingron.myetang.com/zsfunc12.htm(*//标题:处理数据网格的编辑框说明:示例添加焦点颜色;获取还没有提交到数据集的字段文本设计:Zswang日期:2002-03-31支持:wjhu111@21cn.com//*)///////Begin So 阅读全文

posted @ 2019-03-24 17:51 癫狂编程 阅读(227) 评论(0) 推荐(0) 编辑

adoquery.refresh和adoquery.query的区别
摘要:大的区别没有1: requery是通过重新发出原始命令并再次检索数据,可使用 Requery 方法刷新来自数据源的 Recordset 对象的全部内容。调用该方法等于相继调用 Close 和 Open 方法。requery比refresh要安全些(自我感觉),使用refresh时,必须保证数据集是活 阅读全文

posted @ 2019-03-24 17:30 癫狂编程 阅读(717) 评论(0) 推荐(0) 编辑

错误模块名称: KERNELBASE.dll错误
摘要:今天在部署一个C/S程序的时候出了bug,日志都没有记载;本地调试当然是没问题的,所以不是代码问题,百度之发现KERNELBASE.dll这个文章说的比较靠谱,仔细研究了自己的配置文件后,果然是配置文件不小心被我删除了。。。 阅读全文

posted @ 2019-03-24 06:49 癫狂编程 阅读(2614) 评论(0) 推荐(0) 编辑

错误模块名称: KERNELBASE.dll
摘要:部署win服务时,经常会出现类似下面的错误,错误模块名称: KERNELBASE.dll。日志名称: Application 来源: Application Error 日期: 2014/5/21 14:14:33 事件 ID: 1000 任务类别: (100) 级别: 错误 关键字: 经典 用户: 阅读全文

posted @ 2019-03-24 06:48 癫狂编程 阅读(4007) 评论(0) 推荐(0) 编辑

Operation not allowed on a unidirectional dataset错误?
摘要:关于网友提出的“ Operation not allowed on a unidirectional dataset错误?”问题疑问,本网通过在网上对“ Operation not allowed on a unidirectional dataset错误?”有关的相关答案进行了整理,供用户进行参考 阅读全文

posted @ 2019-03-24 06:39 癫狂编程 阅读(906) 评论(0) 推荐(0) 编辑

dbExpress操作中用TDBGrid显示数据
摘要:由于一些数据感知组件如TDBGrid等是需要用到数据缓存的,这和dbExpress组件的存取机制是矛盾的。所以当打开数据集时会出现如下内容的警告框:“Operation not allowed on a unidirectional dataset”! 对dbExpress操作中用TDBGrid显示 阅读全文

posted @ 2019-03-24 06:28 癫狂编程 阅读(251) 评论(0) 推荐(0) 编辑

dbexpress连接mysql提示Operation not allowed on a unidirectional dataset
摘要:最近刚接触delphi,在了解到dbExpress连接mysql的时候,出现了一些问题,特记录下 我遇到的问题有两个 1. TDBGrid --DataSet=TDataSource1 TDataSource --DataSet = SqlTable1 DBNavigator -- DataSet 阅读全文

posted @ 2019-03-24 06:20 癫狂编程 阅读(480) 评论(0) 推荐(0) 编辑

用dbExpress页的SQLConnection1连接sql server2000怎么设置。 [问题点数:0分]
摘要:在d7或者c6已经支持了。 贡献一下我的代码吧:dbeConn:= TSQLConnection.Create(nil); dbeConn.Params.Clear; dbeConn.Params.Values['DriverName']:= 'MSSQL'; dbeConn.Params.Valu 阅读全文

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

DBExpress动态连接SQL-Server
摘要:procedure TForm1.Button1Click(Sender: TObject);var theCNN : TSQLConnection;//定义连接,要引用 DB, SqlExprbegin theCNN := TSQLConnection.Create(self); theCNN.L 阅读全文

posted @ 2019-03-24 06:04 癫狂编程 阅读(401) 评论(0) 推荐(0) 编辑

用dbexpress连接sqlserver数据库
摘要:SQLConnection1.Params.clearSQLConnection1.Params.Values['ServerName'] := '192.168.0.112'; SQLConnection1.Params.Values['Database'] := 'trackData'; SQL 阅读全文

posted @ 2019-03-24 06:04 癫狂编程 阅读(453) 评论(0) 推荐(0) 编辑

DBX error:Driver could not be properly initialized .... 解决办法
摘要:系统: win7 64位+ MySql 将libmysql.dll和Dbxmys.dll 拷到 C:\Windows\SysWOW64 目录. ( 64位系统) 32位则拷到 c:\windows\system32. 注意: libmysql.dll和Dbxmys.dll 这2个文件安装DELPHI 阅读全文

posted @ 2019-03-24 05:57 癫狂编程 阅读(955) 评论(0) 推荐(0) 编辑

控件构造函数需要的AOwner是TComponent,而不是Parent
摘要:普通控件都只有一个构造函数,但是这个构造函数却强迫指定AOwner,也就是说,VCL希望将所有控件(至少是所有可视化控件)全部置于它的管理之下。至于到底显示不显示,那是另一个层次的问题。这个问题其实挺简单,但我就是希望强化一下这个概念。简单观察一下TLabel的构造函数就可以明白这一点: Paren 阅读全文

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

delphi中如何实现DBGrid中的两列数据想减并存入另一列
摘要:可参考下面的例子: 数据自动计算的实现:“金额”是由“单价”和“工程量”相乘直接得来的,勿需人工输入。 这可在“数据源构件”的onupdatedata例程添加如下代码实现: procedure TForm1.DataSource1UpdateData(Sender: TObject); begin 阅读全文

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

SQL的几种连接:内连接、左联接、右连接、全连接、交叉连接
摘要:SQL连接可以分为内连接、外连接、交叉连接。 数据库数据: book表 stu表 1.内连接 1.1.等值连接:在连接条件中使用等于号(=)运算符比较被连接列的列值,其查询结果中列出被连接表中的所有列,包括其中的重复列。 1.2.不等值连接:在连接条件使用除等于运算符以外的其它比较运算符比较被连接的 阅读全文

posted @ 2019-03-22 20:12 癫狂编程 阅读(418) 评论(0) 推荐(0) 编辑

query中对应的OnSetText和onGetText事件
摘要:今天在看代码的时候遇到一个问题,query中的某个字段和在表中显示的不是一个值,我觉得很奇怪,于是找了很久,才知道为什么,原来是query中的OnSetText和onGetText事件在作怪,经过一番学习,我终于知道了这两个事件怎么用。 OnSetText、onGetText的功能是对字段进行读写转 阅读全文

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

delphi中adoquery控件中某个字段Onvalidate事件的用法?
摘要:procedure TForm2.ADOQuery1TestFieldValidate(Sender: TField);begin// Sender就是当前字段,可以在这里对Sender字段进行各种操作。// 例如:if Sender.Value = 'Hello' then Sender.Valu 阅读全文

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

Delphi 在dbgrideh中表格输入数据时有效性的检查(转)
摘要:在数据库系统设计中经常要用到在表格中进行数据录入,如何判断在数据导入时的数据有效性呢?下面介绍几种常用的方法与大家交流。 方法一:Dbgrid是与Table,在Table的Column的OnSetText和OnValidate事件中处理。 1、在OnSetText中判断数据的合法性,如果不合法,在O 阅读全文

posted @ 2019-03-22 18:00 癫狂编程 阅读(242) 评论(0) 推荐(0) 编辑

TField OnValidate 事件
摘要:Occurs just before the data is written to the record buffer. Write an OnValidate event handler to validate changes made to the data in the field, just 阅读全文

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

Delphi之TComponent类
摘要:TComponent类 TComponent类直接由TPersistent派生。TComponent的独特特征是它的属性能够在设计期间通过ObjectInspector来控制,能够拥有其他组件。非可视组件也是从TComponent派生的,因此它们也继承了在设计期间可以被控制的能力。TComponen 阅读全文

posted @ 2019-03-22 10:15 癫狂编程 阅读(992) 评论(0) 推荐(0) 编辑

SQL约束(主键约束、外键约束、自动递增、不允许空值、值唯一、值默认、值限制范围)
摘要:NOT NULL 不允许空值约束 NOT NULL 约束强制列不接受 NULL 值(NULL值就是没有值或缺值)。NOT NULL 约束强制字段始终包含值,即不向字段添加值,就无法插入新记录或者更新记录,也就是在插入或更新行时该列必须有值。 注意:NULL值时没有值,它不是空串、空格等。空串、空格等 阅读全文

posted @ 2019-03-21 19:17 癫狂编程 阅读(1520) 评论(0) 推荐(1) 编辑

Delphi窗体之间互相调用的简单问题
摘要:问题是这样的,我的程序主窗口Form1上面有一个数据连接(ADOCONNECTION1)和ADOQUERY,然后还有一些数据感知组件用于浏览用的,我打算点击From1中的一个“修改数据”按钮,就弹出Form2,在中Form2我打算对其中的某条数据提取出来后进行修改,然后再通知Form1的ADOQUE 阅读全文

posted @ 2019-03-21 16:17 癫狂编程 阅读(986) 评论(0) 推荐(0) 编辑

针式打印机打印上下错位的解决办法
摘要:由于针式打印机在多层复写能力、连续纸处理能力等方面所具备的不可替代的优势,可用户在进行大业务量连续打印时,经常会发生连续打印几张票据后,打印起始位置向上或向下移动,从而导致打印错位的问题。这一问题已成为各行业用户的老大难问题,目前的解决错位的方法是打印几张后通过操作人员手动进行调整,这样会增加操作人 阅读全文

posted @ 2019-03-21 11:19 癫狂编程 阅读(16711) 评论(6) 推荐(0) 编辑

存储过程中的 SET XACT_ABORT ON 和事务
摘要:在存储过程中写SET XACT_ABORT ON 有什么用? SET XACT_ABORT ON是设置事务回滚的!当为ON时,如果你存储中的某个地方出了问题,整个事务中的语句都会回滚为OFF时,只回滚错误的地方 第一种情况:每次成功执行一条语句就立刻进行提交事务 (注意commit tran的位置) 阅读全文

posted @ 2019-03-21 10:16 癫狂编程 阅读(420) 评论(0) 推荐(0) 编辑

关于事务回滚,rollback tran到底要不要写?
摘要:--我比较习惯加xact_abort选项 SET XACT_ABORT ON begin tran update 表1 update 表2 commit tran BEGIN TRANSACTION BEGIN TRY sql_statement COMMIT END TRY BEGIN CATCH 阅读全文

posted @ 2019-03-21 10:15 癫狂编程 阅读(2618) 评论(0) 推荐(0) 编辑

Delphi 工具条按钮上的下拉菜单
摘要:制作步骤: 1、添加一个 TImageList: ImageList1, 然后载入些图标; 2、添加两个 TPopupMenu: PopupMenu1、PopupMenu2, 并分别添加些菜单项; 3、添加一个 TToolBar 控件: ToolBar1, 通过其右键菜单 New Button 添加 阅读全文

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

基于Delphi的三层数据库系统的实现方法
摘要:1 引言 当前的数据库应用系统中,按其结构划分为两类,一类是两层结构的数据库应系统,另一类是多层结构的数据库应用系统。 两层结构的数据库应用系统包括客户/服务器(C/S)模式和浏览器/服务器(B/S)模式,它的特点是数据和程序分离,数据库服务器端管理数据,客户机或浏览器显示、访问和更新数据,因此可以 阅读全文

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

怎样利用ADO中的adoquery进行缓存更新?????(100分)
摘要:我用BDE时,用query与updatesql相结合进行缓存更新,但是在ADO中没有updatesql,只有用adoquery,在DBGRID中,用CANCELUPADTE,只能取消一条记录,烦恼不已,请大虾指导!!! 补充一下,缓存更新是指对多条记录的更改(增加)能取消或保存。 用adoconne 阅读全文

posted @ 2019-03-18 01:17 癫狂编程 阅读(571) 评论(0) 推荐(0) 编辑

Delphi中带缓存的数据更新技术
摘要:一. 概念 在网络环境下,数据库应用程序是c/s或者是多层结构的模式。在这种环境下,数据库应用程序的开发应当尽可能考虑减少网络数据传输量,并且尽量提高并发度。基于这个目的,带缓存的数据更新技术应运而生,其大致过程就是:应用程序将数据库中数据提取到客户端的缓冲区,在缓冲区中完成数据的修改、更新、以及新 阅读全文

posted @ 2019-03-18 01:13 癫狂编程 阅读(1075) 评论(0) 推荐(0) 编辑

Delphi之TStrings和TStringLists类
摘要:Delphi之TStrings和TStringLists类 有些类不是组件,但它们支持存在的组件。这些类是其他组件的典型属性,直接由TPersistent派生,如TStrings、TCanvas和TCollection。 TStrings和TStringLists类 TStrings是一个抽象类,使 阅读全文

posted @ 2019-03-17 20:55 癫狂编程 阅读(1516) 评论(0) 推荐(1) 编辑

Delphi中的构造函数的override的问题
摘要:TObject的构造方法Create不能被override.因为它是一个静态方法。 阅读全文

posted @ 2019-03-17 20:43 癫狂编程 阅读(560) 评论(0) 推荐(0) 编辑

override overload reintroduce的区别(delphi)
摘要:1、override overload reintroduce的中文叫法是什么? override:覆盖;overload:重载;Reintroduce:重定义 2、在子类中override或overload父类中的动态或虚拟方法后是否会改变父类中的相应方法? 不会 3、self是怎么回事,怎么使用 阅读全文

posted @ 2019-03-17 20:43 癫狂编程 阅读(484) 评论(0) 推荐(0) 编辑

一个很初级的错误 Destructor忘记override导致内存泄露
摘要:Destructor Destroy(); !!!此处开始忘记override;,导致内存泄露。 而此时fastmm显示的地址也不大相关 一个很初级的错误,不过第一次碰到,刚开始没有往那想。 阅读全文

posted @ 2019-03-17 20:42 癫狂编程 阅读(252) 评论(0) 推荐(0) 编辑

Delphi通过查找字符定位TADOQuery数据的位置
摘要:通过TADOQuery的方法Locate,输入字符,查找到定位到对应的数据位置,优点快速定位,缺点是只匹配查找到的和第一个位置,无法连续定位下一个! //定位qrymembertype.Locate('Cname', Cname, [loCaseInsensitive]); 'Cname'列名Cna 阅读全文

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

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

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

delphi ADOQuery 开启本地缓存
摘要:在开发 C/S 应该程序的时候,有时为了程序的运行提高效率。 需要使用 缓存功能; //ADO组件需要把 ADOQuery1.LockType:=ltBatchOptimistic; ADOQuery1.CacheSize:=1000; ADOQuery1.CursorLocation:=ctSta 阅读全文

posted @ 2019-03-16 18:53 癫狂编程 阅读(886) 评论(0) 推荐(0) 编辑

如何判断一个事务是否已开始?
摘要:如何判断一个事务是否已开始?怎么才能判断是否调用了StartTransaction? if adoconnection1.InTransaction then...... 阅读全文

posted @ 2019-03-16 11:05 癫狂编程 阅读(1154) 评论(0) 推荐(0) 编辑

SQL Server 取日期时间部分
摘要:在本文中,GetDate()获得的日期由两部分组成,分别是今天的日期和当时的时间: Select GetDate() 用DateName()就可以获得相应的年、月、日,然后再把它们连接起来就可以了: Select Datename(year,GetDate())+'-'+Datename(month 阅读全文

posted @ 2019-03-16 09:54 癫狂编程 阅读(13399) 评论(0) 推荐(0) 编辑

delphi中怎么获取服务器的时间
摘要:下面是公司的代码,调整成ADO控件,给你参考一下: 简单的说,MSSQL数据库,使用“Select GetDate() ”这样的SQL语句获取数据库服务器时间,而Oracle则使用“Select SysDate”这样的SQL语句。 阅读全文

posted @ 2019-03-15 20:17 癫狂编程 阅读(772) 评论(0) 推荐(0) 编辑

时空CLR解密登陆密码源码
摘要:时空CLR登陆密码解密源码 适用于SQL SERVER2005 以上版本 阅读全文

posted @ 2019-03-15 11:27 癫狂编程 阅读(348) 评论(0) 推荐(0) 编辑

让数据库变快的10个建议
摘要:大多数网站的内容都存在数据库里,用户通过请求来访问内容。数据库非常的快,有许多技巧能让你优化数据库的速度,使你不浪费服务器的资源。在这篇文章中,我收录了十个优化数据库速度的技巧。SQL培训0. 小心设计数据库 第一个技巧也许看来理所当然,但事实上大部分数据库的问题都来自于设计不好的数据库结构。 譬如 阅读全文

posted @ 2019-03-15 11:17 癫狂编程 阅读(169) 评论(0) 推荐(0) 编辑

怎样让DBGrid在按住Shift点鼠标的同时能将连续范围的多行选中?
摘要:参见例子:…privateSel : Boolean ;//判断是否处于选择状态BookMark : TBookMark ;//记录先前的位置…procedure TForm1.DBGrid1MouseUp(Sender: TObject; Button: TMouseButton;Shift: T 阅读全文

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

DELPHI 解决DBGrid SHIFT键多选问题
摘要:在实际项目中,偶然遇到需要按下SHIFT键,在DBGrid中进行多选的情况,测试了几种方法,最终确定了一个比较好的解决方法,总结如下: 阅读全文

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

找出你的短板
摘要:《软技能:代码之外的生存指南》第35章发现自己的知识短板,本章的内容都是关于发现妨碍你发挥自身全部潜能的知识短板的。我们将研究这些短板为何会存在,如何找到它们,以及最终如何填补它们,从而让你不受自己所不知的限制。本节为大家介绍找出你的短板。 找出你的短板 你的知识短板并不全都显而易见。事实上,大多数 阅读全文

posted @ 2019-03-15 00:20 癫狂编程 阅读(344) 评论(0) 推荐(0) 编辑

跪求delphi 中的bitbutton 中的bmp图标
摘要:C:\Program Files (x86)\Embarcadero\RAD Studio\11.0\Images\GlyFX 阅读全文

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

ADOTable的CancelUpdate和CancelBatch的区别?(100分)
摘要:出差新疆,修改别人的代码,请教CancelUpdate和CancelBatch的区别! 如果希望取消对当前记录所做的任何更改或者放弃新添加的记录,则必须调用CancelUpdate 方法CancelBatch [AffectRecords]. 当记录集处于批修改模式下时,该方法用于取消任何要发生的修 阅读全文

posted @ 2019-03-14 18:54 癫狂编程 阅读(464) 评论(0) 推荐(0) 编辑

delphi 通过事务插入数据
摘要:orsn1.StartTransaction; try qry1.Sql.Clear; qry1.Sql.Text:=' select * from log '; qry1.Open; qry1.Insert; qry1.FieldByName('Rq').AsDateTime:=StrToDate(Forma... 阅读全文

posted @ 2019-03-14 18:15 癫狂编程 阅读(698) 评论(0) 推荐(0) 编辑

Delphi中封装ADO之我重学习记录
摘要:delphi adodataset ctstatic 数据是缓存在服务器端还是客户端 答:客户端,开启本地缓存功能后,就能数据在本地批量修改后,再批量提交,减少了网络传送 delphi adodataset ctstatic 数据是缓存在服务器端还是客户端 原创,专业,图文 Delphi中封装ADO 阅读全文

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

Delphi之Exception获得错误信息(简单好理解)
摘要:Delphi之Exception获得错误信息 Delphi之Exception获得错误信息 相关资料: http://www.cnblogs.com/hackpig/archive/2010/02/15/1668547.html 实例代码: 1 unit Unit1; 2 3 interface 4 阅读全文

posted @ 2019-03-14 13:15 癫狂编程 阅读(310) 评论(0) 推荐(0) 编辑

the project already contains a form or module named pcm001怎麼解決
摘要:the project already contains a form or module named pcm001怎麼解決 菜单Project -> Remove from project...找到你的包含pcm001(类名)单元,先移掉再加 阅读全文

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

Delphi中的Sender:TObject对象解析
摘要:Delphi中的Sender:TObject对象解析 procedure TForm1.Button1Click(Sender: TObject); begin end; 解析:Procedure是过程,TForm是窗体类,加上数字就是某个窗体,像TForm1就是Form1窗体。 Button1是你 阅读全文

posted @ 2019-03-14 12:28 癫狂编程 阅读(260) 评论(0) 推荐(0) 编辑

Delphi中的窗体创建与销毁
摘要:Delphi中的窗体,有模式窗体与非模式窗体两种。两种窗体的调用方式不同,模式窗体使用ShowModal显示,非模式窗体使用Show显示。当显示模式窗体的时候你是不能操作本程序的其他窗体的,你不能把焦点从模式窗体转到其他窗体上。而非模式窗体则没有这种限制,你可以从一个非模式窗体切换到另外一个非模式窗 阅读全文

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

DELPHI中MDI子窗口的关闭 和打开
摘要:Delphi中MDI子窗口的关闭方式默认为缩小而不是关闭,所以当你单击子窗口右上角的关闭按钮时会发觉该子窗口只是最小化,而不是你预期的那样被关闭。解决办法是在子窗口的OnClose事件处理过程中加入如下代码,示例:procedure ChildForm.OnClose(Sender: TObject 阅读全文

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

Delphi编码规范
摘要:以下是在之前的公司与别人共同参与制定的Delphi开发规范(5年前了,那时用的还是Delphi7,部分规则可能有些过时,但不整理了,觉得有用的人,自己整理成适合自己的开发规范吧), 目 录一、序言 二、通用源代码格式规则2.1 缩格2.2 页边空格 2.3 Begin…End 配对 2.4代码文件中 阅读全文

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

sql语句中日期相减的操作
摘要:select datediff(year, 开始日期,结束日期); --两日期间隔年select datediff(quarter, 开始日期,结束日期); --两日期间隔季select datediff(month, 开始日期,结束日期); --两日期间隔月select datediff(day, 阅读全文

posted @ 2019-03-13 19:28 癫狂编程 阅读(17976) 评论(0) 推荐(1) 编辑

sql server2005查询分析器显示行号方法
摘要:工具栏:工具--选项--文本编辑器 所有语言--右边复选框 行号 打上勾就ok了 阅读全文

posted @ 2019-03-13 18:32 癫狂编程 阅读(243) 评论(0) 推荐(0) 编辑

SQL 事务 begin tran、commit tran、rollback tran 的用法
摘要:首先理解一下这三个事务的大概意思: begin Transaction 可以理解成新建一个还原点。 commit Transaction 提交这个自begin tran开始的修改 rollback Transaction 表示还原到上个还原点。 今天在更新一个ERP仓库名称的时候导致该界面一直属于L 阅读全文

posted @ 2019-03-13 16:27 癫狂编程 阅读(1309) 评论(0) 推荐(0) 编辑

在做销售录入界面时,如何使用dbgrid?(50分)
摘要:给你段源码看一看用stringgird做得: 阅读全文

posted @ 2019-03-09 17:52 癫狂编程 阅读(302) 评论(0) 推荐(0) 编辑

下载 Internet Explorer 11(脱机安装程序)
摘要:https://support.microsoft.com/zh-cn/help/18520/download-internet-explorer-11-offline-installer 语言 本地名称 Windows 版本 阿拉伯语 العربية Windows 7 SP1 32 位Windo 阅读全文

posted @ 2019-03-09 16:55 癫狂编程 阅读(1613) 评论(0) 推荐(0) 编辑

MSSQL约束【转】
摘要:为了减少数据冗余和使数据库内容变的严谨,MSSQL数据库里引入了关系和约束。我们平时做一些小程序,需要使用到MSSQL数据库的时候大多没有严格去规划一下数据库的设计,但是真正开发的时候需要你严格的进行需求分析后再进行数据库设计,好的数据库设计对于维护和未来对程序的扩展有着非常大的好处。 所以我觉的学 阅读全文

posted @ 2019-03-08 12:32 癫狂编程 阅读(319) 评论(0) 推荐(0) 编辑

SQL Server中有关约束(constraint)的一些细节
摘要:本文出处:http://www.cnblogs.com/wy123/p/7350265.html (保留出处并非什么原创作品权利,本人拙作还远远达不到,仅仅是为了链接到原文,因为后续对可能存在的一些错误进行修正或补充,无他) SQL Server 数据库中的约束(Constrint)是作用是为了保证 阅读全文

posted @ 2019-03-08 12:31 癫狂编程 阅读(464) 评论(0) 推荐(0) 编辑

SQLServer - 约束
摘要:一、约束的分类 在SQLServer中,有3种不同类型的约束。 1、实体约束 实体约束是关于行的,比如某一行出现的值就不允许出现在其他行,例如主键。 2、域约束 域约束是关于列的,对于所有行,某一列有那些约束,例如CHECK约束。 3、参照完整性约束 如果某列的值必须与其他列的值匹配,那就意味着需要 阅读全文

posted @ 2019-03-08 12:30 癫狂编程 阅读(252) 评论(0) 推荐(0) 编辑

SQLServer如何快速生成100万条不重复的随机8位数字
摘要:/* --作者:邹建 --来自:csdn 最近在论坛看到有人问,如何快速生成100万不重复的8位编号,对于这个问题,有几点是需要注意的: 1. 如何生成8位随机数,生成的数越随机,重复的可能性当然越小 2. 控制不重复 3. 考虑性能 针对这个问题,我写了如下的示例来解决,希望能为有这类需求的人提供指导 */ USE tempdb GO --创建测试表 CREATE T... 阅读全文

posted @ 2019-03-08 11:51 癫狂编程 阅读(1512) 评论(0) 推荐(0) 编辑

理解 Delphi 的类(十) - 深入方法[17] - 提前声明
摘要://要点17: 如果前面的方法要调用后面的方法, 后面的方法需要提前声明 function MyFunB(x: Integer): Integer; forward; {使用 forward 指示字提前声明} function MyFunA(x: Integer): Integer; begin R 阅读全文

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

理解 Delphi 的类(十) - 深入方法[18] - 在接口区声明的方法都相当于提前声明了
摘要://要点18: 如果函数在接口区定义了, 就无需用 forward 提前声明了 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, 阅读全文

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

delphi 导出到excel的第1种方法
摘要:第一种方法delphi 快速导出excel 调用: ToExcel('D:\a.xsl',QueryToExcel);//路径可以自定义 ********************************************************************************* 阅读全文

posted @ 2019-03-07 18:57 癫狂编程 阅读(480) 评论(0) 推荐(0) 编辑

delphi的一个公用函数库
摘要:delphi的一个公用函数库 阅读全文

posted @ 2019-03-07 18:47 癫狂编程 阅读(445) 评论(0) 推荐(0) 编辑

DELPHI公用函数
摘要:unit YzDelphiFunc; interface uses ComCtrls, Forms, Windows, Classes, SysUtils, ComObj, ActiveX, ShlObj, Messages, Graphics, Registry, Dialogs, Controls, uProcess, uCpuUsage, StrUtils, CommCtrl,... 阅读全文

posted @ 2019-03-07 18:45 癫狂编程 阅读(402) 评论(0) 推荐(0) 编辑

Delphi 导出数据至Excel的7种方法【转】
摘要:一; delphi 快速导出excel uses ComObj,clipbrd; function ToExcel(sfilename:string; ADOQuery:TADOQuery):boolean; const xlNormal=-4143; var y : integer; tsList 阅读全文

posted @ 2019-03-07 18:27 癫狂编程 阅读(1734) 评论(0) 推荐(0) 编辑

SQL ROUND函数的使用
摘要:SQL ROUND函数的使用 SQL ROUND函数是对数据进行制定精度的取值。 第一个参数是取值的数据,第二个参数是精度,第三个参数是数据取值模式(四舍五入还是截断),其中第三个参数是可选参数,默认是四舍五入模式。 从上面结果可以看出,数据并非只保留两位小数,而是保留两位有效小数。 从上面两次可以 阅读全文

posted @ 2019-03-06 18:10 癫狂编程 阅读(548) 评论(0) 推荐(0) 编辑

ThinkPHP从零开始(一)安装和配置
摘要:序: 对PHP一无所知的我,将从这里从零开始。 1.下载与安装 ThinkPHP的下载: ThinkPHP中文站下载页面 有 核心版和完整版两种,由于不了解。所以我选择了完整版。 WampServer: 按照官方的推荐,使用集成开发环境WAMPServer (是一个集成了Apache、PHP和MyS 阅读全文

posted @ 2019-03-06 17:51 癫狂编程 阅读(5683) 评论(0) 推荐(0) 编辑

SQL 中LTrim、RTrim与Trim的用法
摘要:LTrim、RTrim与 Trim 函数 返回 Variant (String),其中包含指定字符串的拷贝,没有前导空白 (LTrim)、尾随空白 (RTrim) 或前导和尾随空白 (Trim)。语法LTrim(string)RTrim(string)Trim(string)必要的 string 参 阅读全文

posted @ 2019-03-06 16:34 癫狂编程 阅读(9404) 评论(0) 推荐(0) 编辑

phpStudy-坑爹的数据库管理器-phpMyAdmin的默认用户名和密码
摘要:在这里我必须承认自己的弱智,第一次使用phpMyAdmin竟然搞了10分钟才进去!!! 要使用默认的用户名和密码: 用户名:root 密码:root 尼玛!坑爹啊!不说清楚让我百度了半天!!!! 阅读全文

posted @ 2019-03-06 15:12 癫狂编程 阅读(510) 评论(0) 推荐(0) 编辑

解决Delphi 2010启动时出现cannot create xxxx\EditorLineEnds.ttr问题
摘要:由于在Windows安装了最近的更新(KB2982791, KB2970228)后,Delphi的IDE需要创建的一个文件%TEMP%\EditorLineEnds.ttr会被系统锁定,导致除非重新启动操作系统,否则Delphi 8~2010无法启动两次。 Delphi的IDE在启动时提取了一个字体 阅读全文

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

数据库中增加操作insert into的用法和查询select的用法
摘要:insert into的用法 1.一条insert into 可以插入多条记录 2.insert into 能判断主键是否冲突,和做出冲突处理 如果主键冲突的话会报错,还能写成如果冲突就更新的形式格式为 : insert into 表名 (字段列表) values (字段值列表) on duplic 阅读全文

posted @ 2019-03-01 18:22 癫狂编程 阅读(7542) 评论(0) 推荐(0) 编辑

TRichEdit怎样新增的内容到最后一行?
摘要:Delphi里使用TRichEdit,使用SetSelTextBuf时可以设置显示的字体格式,但是显示位置是在当前的插入光标后,如果人为改变插入光标的位置,比如在其他位置单,以后再插入的内容位置就没办法控制了。能不能限制每次新增加的内容都加到末尾?或者用其他的方式实现增加内容也可以,但是要能够控制这 阅读全文

posted @ 2019-03-01 12:38 癫狂编程 阅读(831) 评论(0) 推荐(0) 编辑

BCB将RichEdit光标移到最后一行
摘要:int linecount=RichEdit1->Lines->Count; RichEdit1-> SelStart=SendMessage(RichEdit1-> Handle,EM_LINEINDEX,linecount,0); RichEdit1-> SelStart=RichEdit1->SelStart+linecount; 阅读全文

posted @ 2019-03-01 12:35 癫狂编程 阅读(329) 评论(0) 推荐(0) 编辑

怎么把焦点放在RichEdit的最后一行
摘要:急急急!!!!如何把焦点放在RichEdit的最后一行!! 请高手指点,在线等!!!!当添加到出现滚动条时焦点就不会往下了,怎么把焦点移到最后一行 RichEdit-> Lines-> Add( "ADF "); 解决方案 添加完以后让RichEdit滚动一下: RichEdit1-> Lines- 阅读全文

posted @ 2019-03-01 12:34 癫狂编程 阅读(553) 评论(0) 推荐(0) 编辑

Panel自动变颜色
摘要:ParentBackground := False; 阅读全文

posted @ 2019-03-01 10:33 癫狂编程 阅读(200) 评论(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
好的代码像粥一样,都是用时间熬出来的
点击右上角即可分享
微信分享提示