Icebird

摘要： 某些情况下直接使用IIF可以使程序变得更加简洁，Delphi没有现成的，写一个也很简单：function iif(Condition: Boolean; TrueReturn, FalseReturn: Variant): Variant;begin if Condition then Result := TrueReturn else Result := FalseReturn;... 阅读全文

摘要： 之前写过一个共享软件的注册系统，并从中得到一些经验：其实，软件注册从用户需求来说，是并不存在这种需求的，但是由于软件产品的特性（容易复制），决定了绝大多数的商业软件都要对其产品进行一定的保护，这种保护的目的就是让购买了其产品的用户能够正常使用，而未购买的用户只能试用或完全不能使用。如何设计一个好的注册算法，并且防止那些好事者的破解不是一件容易的事，我的建议是尽量采用如md5,des等复杂的算法，并... 阅读全文

摘要： 打开关于对话框，按住Alt键不放并输入JEDI或者DEVELOPERS或者TEAM或者QUALITYAfter the large DELPHI word scrolls off the screen you will see:- a praise to the Joint Endeavour of Delphi Innovators (and a link to their site in th... 阅读全文

摘要： 下面就是一个例子展示如何从打开的Internet Explorer中取得其网页元素的HTML源代码： const RSPSIMPLESERVICE = 1; RSPUNREGISTERSERVICE = 0; type TObjectFromLResult = function(LRESULT: lResult; const IID: TIID; WPARAM: wParam; out p... 阅读全文

摘要： 通过RTTI (Runtime Type Information)可以很方便的操作Delphi控件。比如已知控件名称访问控件：var Panel: TComponent;begin Panel := FindComponent("pnlToolbar"); If Panel is TPanel then TPanel(Panel).Color := clSilver;end; 阅读全文