最近在考虑MIS系统界面的整体框架，决定使用MDI Form 模块中的MDI Child，但是MDI form的工作区总有讨厌的粗边。 昨天下午从网上查到C 版本的解决方法，就花了点时间翻译成delphi的，呵呵，供大家参考。 在MDI Form中写入如下代码： interface TFmMain = class(TForm)...

2008-04-09 04:21:10

procedure CornerDetect(sWidth, sHeight: longint; Quality: extended); var i, j, fi, fj: longint; a, b, c, sum, MinAccept, MaxEigenvalue: extended; begin FeatureCount := 0; { 下面采用Good Feature To Track介绍的方法 J. Shi and C. Tomasi Good Features t...

2008-04-09 04:21:05

TValueListEditor 控件使用方法 CST 2005-07-19 1 文档目的 1.1 写作目的 本文简单介绍了 TvalueListEditor 控件的基本使用方法。可以使用该控件实现类似 DELPHI 中 OBJECT INSPECTOR 的功能。 1.2 备注 下文所有 vle 为一个 TvalueListEditor 对象。 2 简单操作 操作...

2008-04-09 04:21:01

(期待整理) Row cannot be located for updating的解决方法: //---- ADCPROP_UPDATECRITERIA_ENUM Values ---- //Const adCriteriaKey = 0 //Const adCriteriaAllCols = 1 //Const adCriteriaUpdCols = 2 //Const adCriteriaTimeStamp = 3 adsPlanGoods.Properties['''...

2008-04-09 04:21:00

Delphi的RSS开源项目正式启动了! 第一次讨论主要确定了开发工具为Delphi2005 upd3(D9) ，推荐用Delphi9.03 for Win32精简版。待决定的问题为本项目的名称，包括中文名和英文名。 现有成员（排名不分先后），及联系方式： 我不是谁 [1314300] mosane#163.com 在水一方 [...

2008-04-09 04:20:59

//-------------------------------------------------------------------------------- // 功能：将 DbGrid 当前列定位到某字段上。 // 参数： pDbGrid:TDbGrid; DBGrid // pcFieldName : string 数据表字段名，字段名不区分大小写 // 返回：当表字段在 DBGrid 中存在...

2008-04-09 04:20:59

GoBack：方法，后退到上一个页面。 GoForward：方法，前进到下一个页面。 GoHome：方法，调用默认的主页页面，该页面在IE的选项中设定。 GoSearch：方法，调用默认的搜索页面，该页面在IE的选项中设定。 Refresh：方法，刷新当前页面。 Stop：方法，停止调用或打开当前...

2008-04-09 04:20:57

program Window; { This is an example of making an application without using the Forms unit. Forms.pas is the Delphi unit that makes your programs so damn huge! Forms.pas has all the code for translating the forms you create with Delphi w/components...

2008-04-09 04:20:56

今天一个好友在群里问： : 在VCL库里，大多数构造函数是virtual的，这是为啥 : 按理，在调用构造函数之前，对象都还没有， : 当然也应该没有vtbl，那么这样virtual有什么意义呢？ : 所以C 里的构造函数没有virtual的。 : 难道Delphi里不是酱紫地？ : 那么vtbl是在什么...

2008-04-09 04:20:54

1.设置TVirtualStringTree属性： toFullRowSelect : false; toMultiSelect:false; toExtendedFocous:true; toEditable:true; editDelay:0 //如果不调用editnode，则不会CREATE EDITOR 2.实现virtualStringtree的ONClick事件： 功能：根据当前获取焦点的node，判断是否e...

2008-04-09 04:20:53