摘要: 阅读全文
posted @ 2017-09-16 11:00 绿水青山777 阅读(129) 评论(0) 推荐(0)
摘要: Windows将消息分成了几块,其中的一块是划分给程序自定义的消息使用的。自定义的消息其实于WM_APP。当然了,自定义的消息也可以不从WM_APP开始,但是那样的话,你定义的消息代码有可能和Windows的消息代码重复。所以,安全起见,自定义的消息,最好还是从WM_APP开始。 procedure 阅读全文
posted @ 2017-09-15 16:28 绿水青山777 阅读(156) 评论(0) 推荐(0)
摘要: 转自于:http://www.cnblogs.com/findumars/p/3847804.html 有意思的RTL函数RegisterClass(在持久化中,你生成的一个新类的对象,系统并不知道他是如何来的,因此需要你注册)good 例子1:Delphi中使用纯正的面向对象方法(这个例子最直接) 阅读全文
posted @ 2017-09-14 09:16 绿水青山777 阅读(279) 评论(0) 推荐(0)
摘要: procedure TfrmBiaoBLBWH.Button1Click(Sender: TObject);var ABinary,AText:TMemoryStream;begin inherited; ABinary:=TMemoryStream.Create; ABinary.WriteCom 阅读全文
posted @ 2017-09-14 08:59 绿水青山777 阅读(172) 评论(0) 推荐(0)
摘要: 转:http://ymg97526.blog.163.com/blog/static/17365816020101021703631/ //添加一个TApplicationEvents组件 //OnMessage:控制着整个应用程序的消息循环 //OnIdle:应用程序空闲时触发 procedure 阅读全文
posted @ 2017-09-08 11:24 绿水青山777 阅读(400) 评论(0) 推荐(0)
摘要: 例子1 测试 时,CPU并没有占用100% 不知道是否Delphi高版本已优化。 声明:Property OnIdle:TIdleEvent;其中:TIdleEvent是这样声明的:TIdleEvent=Procedure(Sender:TObject;Var Done:Boolean) of Ob 阅读全文
posted @ 2017-09-08 11:12 绿水青山777 阅读(1108) 评论(0) 推荐(0)
摘要: 这个事件 对每个字段都处理,在窗体退出时,因关闭了数据集,所以这个事件也要执行一次。这样就会造成,内存地址错误。 procedure TFrmYaoKYPCKBL.DataSource1DataChange(Sender: TObject; Field: TField);begin inherite 阅读全文
posted @ 2017-09-04 15:21 绿水青山777 阅读(398) 评论(0) 推荐(0)
摘要: --禁用外键 alter table GONGHDW disable primary key cascade;--启用外键alter table GONGHDW enable primary key; 阅读全文
posted @ 2017-08-16 15:57 绿水青山777 阅读(238) 评论(0) 推荐(0)
摘要: 长度为8 。 存的时候 原数据库中的中文数据为 一个汉字二个字节。新的数据库 字符集为 al32utf8 中 一个汉字为 三个字节存。 所以,现修改原数据库char类型为原长3倍。 length 取的时候是单个计算取的。 阅读全文
posted @ 2017-08-16 10:01 绿水青山777 阅读(1672) 评论(0) 推荐(0)
摘要: oracle表空间、用户、导入导出相关 1. 导入导出相关:... 2 1.1. oracle 11g"不能使用exp导出空表"的解决方法: 2 1.2. Oracle用imp导入dmp 提示遇到 ORACLE 错误 12560 TNS: 协议适配器错误 解决方法... 2 2. 用户相关... 4 阅读全文
posted @ 2017-08-15 21:19 绿水青山777 阅读(369) 评论(0) 推荐(0)