摘要: 最近用delphi xe做了个东西,因为以前一直使用Delphi 7做开发,delphi 7 到delphi XE有了很大的变化,最大的变化就是对Unicode的支持,所以刚开始使用DELPHI XE时还有些不太习惯,尤其在字符串处理的时候。DELPHI XE 增加了UnicodeString 类型,这在Delphi 7中是没有的,默认的String字符串为UnicodeString,而String在Delphi 7中是AnsiString类型,在新版的DELPHI中,字符串的存储格式也发生了变化:在DELPHI7中,字符串的存储格式是这样子的:【引用计数位(-8byte)】【字符串长度(-4 阅读全文
posted @ 2013-09-06 15:09 Max Woods 阅读(3098) 评论(0) 推荐(0) 编辑
摘要: unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, uPSComponent, StdCtrls, uPSCompiler, uPSUtils, uPSRuntime;typeTTestFunction = function (Param1: Double; Data: string): LongInt of object;TForm1 = class(TForm)st: TPSScript;Button1: TButton;Butt 阅读全文
posted @ 2013-09-06 10:42 Max Woods 阅读(984) 评论(0) 推荐(0) 编辑
摘要: 摘自RemObjects Wiki本文提供RemObjects Pascal Script的整体概要并演示如何创建一些简单的脚本.Pascal Script包括两个不同部分:编译器 (uPSCompiler.pas)运行时 (uPSRuntime.pas)两部分彼此独立.可以分开使用,或通过TPSScript控件使用他们,这个控件定义在uPSComponent.pas单元,对这两个部分进行简易封装.要使用控件版本的Pascal Script,首先要将控件放在窗体或data module上,并设置script属性,调用Compile和Execute方法.编译的错误,警告,提示可在Compiler 阅读全文
posted @ 2013-09-06 10:30 Max Woods 阅读(927) 评论(0) 推荐(0) 编辑
摘要: 翻譯這篇文章源於我的一個通用工資計算平台的想法,在工資的計算中,不可避免的需要使用到自定義公式,然而對於自定義公式的實現,我自己想了一些,也在網上搜索了很多,解決辦法大致有以下幾種:1.自己寫代碼去解析公式。這種方法的缺點是,解析的代碼很難實現,如果公式的功能比較完整,如增加條件判斷或自定義函數。不亞於實現了一個簡單的語言編譯囂或解釋囂。所以,只能實現一些諸如加減乘除之類的簡單公式。2.打包成SQL傳給數據庫去執行。這顯然不是一種好辦法。而且需要與特定的數據庫和表結構進行適應。3.我想到在foxpro中有宏替換功能&,那不如就借用它的這個功能,即利用foxpro寫一個dll,在這個dl 阅读全文
posted @ 2013-09-06 10:24 Max Woods 阅读(1495) 评论(0) 推荐(0) 编辑