癫狂编程

摘要： 一、新建一控件 打开Delphi主菜单Cpmponent—New Cpmponent： 二、配置参数 点击OK键，打开Unit单元文件。 三、修改单元文件 unit LyCalendar; interface uses Windows, Messages, SysUtils, Variants, C 阅读全文

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

摘要： //判断单位转换率 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'... 阅读全文

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

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