癫狂编程

摘要： 用Delphi编写数据库程序经常会用到BDE [@more@] 但是前一段发现一个问题，根据程序需要修改了BDE的设置，结果发现只能运行一个实例，再打开这个程序或其他用到BDE的程序系统就会报错： Exception: EDBEngineError Message: An error occurre 阅读全文

摘要： 按 F1 进入 UEFI， 选择“System Settings”- “Adapters and UEFI Drivers”- “Please press ENTER to compile the list of drivers”， 然候选择“LSI EFI SAS Driver”下面那一行， 即“ 阅读全文

摘要： 先看一个非多线程的例子, 代码执行时不能进行其它操作(譬如拖动窗体): 修改为多线程(只修改一行代码): 代码分析: 1、TThread 现在增加了许多 class 方法(直接通过类名调用的方法), TThread.CreateAnonymousThread() 就是比较有用的一个. 2、顾名思义, 阅读全文

摘要： 1、挂起，不占CPUsleep2、不挂起,占cpuprocedure Delay(msecs:integer);varFirstTickCount:longint;beginFirstTickCount:=GetTickCount;repeatApplication.ProcessMessages; 阅读全文

摘要： delphi 自带的Timer控件，使用方便，但它的 OnTimer 事件是在主线程中引发的。 如果在事件中执行较耗时的代码，会引起主界面假死。故实现一个线程的Timer就有必要了。 TThreadTimer 基于 TSimpleThread 继承而来。 本例源码下载 阅读全文

摘要： { 修改者：ghs 日期：20071218 功能：在原版本的基础上增加。 RegisterControl：注册需要提示的控件。 BeginHelp：设置光标状态为帮助crHelp； 鼠标弹起后，显示注册的提示信息，同时光标进行还原。 原版本 作者：thaoqi 出处：http://www.2ccc.com/article.asp?articleid=4389 功能：首先谢谢xsherry大大，来盒 阅读全文

摘要： delphi中，我用定时器每隔一段时间执行数据库插入及更新工作!adoquery.close;adoquery.sql.cleare;adoquery.connection:=con1;adoquery.sql.add('exec addery');execsql;上面的基本语句!我的问题是:定时器 阅读全文

摘要： 假设有过程： procedure TForm1.Button1Click(Sender: TObject);begin ShowMessage('唐细刚 2008');end; 想在 FormCreate 时候调用，怎么调用？ 办法是： procedure TForm1.FormCreate(Sen 阅读全文

摘要： 挽回女人时，你与女人的对话是很重要的，能不能引起她的好奇，发起有效话题，能否与之随着话题继续聊下去而不是乱搭话，都关乎着挽回的成与败。一个良好的聊天氛围会随着话题的深入让她对你产生新的认知，感觉到你比分手前更懂人心、更平易近人，继而开始对你有兴趣。否则如果话题无法展开，你和她之间便连最简单的沟通都做 阅读全文

摘要： 单价和数量输入完后，在数量单元格往任何方向移动（上下左右），金额都能自动计算。如何实现？ 不要在UI元素的事件中计算字段，你可以在单价字段和数量字段的OnChange事件中进行计算。假设数据集名称为DataSet，在数据模块中编写一个过程：procedure CalcMoney(Sender: TF 阅读全文

摘要： 在很多情况下，我们需要的数据与数据库中其它字段的数据相关，例如订单的金额为数量与单价的乘积。在应用程序中，若要在显示订单具体条目的同时显示金额，通常要创建一个字段，在显示该字段之前先进行乘法运算，将金额值存储在该字段中。但是，若用户修改了数量或单价，那就不得不更改金额值。这个问题立刻变得复杂起来，幸 阅读全文

摘要： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TSysChatMainForm = class(TForm) procedure FormCreate(Sender: TObject); procedure For 阅读全文

摘要： 类似文章搜索引擎上有很多，内容大致相同，今天所谓细聊是因为我在借鉴这些文章时候走了些弯路，所以写此文，为自己备忘，同时如果能为初涉此处知识点的小伙伴提供些帮助就更好了,文章结尾处的一些扩展有一定实战意义，废话不多说。 我的应用场景： 项目系统使用oracle数据库，与客户的第三方系统供应商实现资源共 阅读全文

摘要： 先创建一个简单的触发器 阅读全文

摘要： 1）在添加删除程序里卸载delphi 2007 2）删除C:\ProgramData\CodeGear 3）删除C:\Program Files (x86)CodeGear 4）删除d:\Program Files (x86)CodeGear （我一般选择d盘安装程序） 5）删除注册表下codege 阅读全文

摘要： In RAD Studio, Delphi, C++Builder, XE4 there can become a scenario if you try to modify, repair, upgrade, or even remove the installation you will get 阅读全文

摘要： 分类 范围 字节 备注 简单类型 序数 整数 Integer -2147483648 .. 2147483647 4 有符号32位 Cardinal 0 .. 4294967295 4 无符号32位 Shortint -128 .. 127 1 有符号8位 Smallint -32768 .. 32 阅读全文

摘要： 更新指定窗口的客户区。如果窗口更新的区域不为空，UpdateWindow函数就发送一个WM_PAINT消息来更新指定窗口的客户区。函数绕过应用程序的消息队列，直接发送WM_PAINT消息给指定窗口的窗口过程，如果更新区域为空，则不发送消息。相当于刷新一下窗口 阅读全文

摘要： 前言：网上有很多介绍delphi创建闪屏的代码，大多只是在程序开启前显示一个闪屏，但是却没有说如何在闪屏上显示程序加载的进度，于是笔者有意思介绍一下这种闪屏方式。 1.创建一个窗体(TfrmSplash)，放入一个TImageBox,加载一幅图片，调整好TImageBox与图片的大小，然后在其上放入 阅读全文

摘要： //在工程里面写 Application.Initialize; Application.Title := '管理系统'; Application.ShowHint := True; //闪现窗体创建显示 FormSplash := TFormSplash.Create(Application); FormSplash.Show; FormSplash.Update; Application.Cr 阅读全文