Delphi XE新语法/新功能

本文整理自网络，侵删。

 
uses System.NetEncoding;

TNetEncoding.Base64.EncodeString(S);
TNetEncoding.Base64.DecodeString(S);
TNetEncoding.URL.EncodeString(S);
TNetEncoding.URL.DecodeString(S);
TNetEncoding.HTML.EncodeString(S);
TNetEncoding.HTML.DecodeString(S);

动态数组新语法，可以不用Setlength，赋值时候有点类似动态语言。

String-like operations on Dynamic Arrays
B := [1, 2, 3, 4];
B := B + [5, 6, 7];
Insert([6, 7, 8], B, 5); // inserts array [6, 7, 8], into B at index 5
Delete(B, 1, 3); // deletes 3 elements starting at index 1
Concat([1,2,3,4],[5,6,7])
var B: TBytes = [1, 2, 3, 4];
Improved initialization for Dynamic Arrays
B := [1, 2, 3, 4];
B := B + [5, 6, 7];

type
  TBytes = array of Byte;
  TBytesArray = array of TBytes;
  TStrDA = array of string;
 
resourcestring
  Sabc = 'abc';
  Sdef = 'def';
 
var
  B: TBytes = [1, 2, 3, 4];
  C: TBytesArray = [[1, 2, 3], [4,5,6]];
  D: TStrDA = ['ABC', 'DEF'];
  E: TStrDA = [ Sabc, Sdef ];


函数的返回,可以直接用exit(retuanvalue)来替代result:=retuanvalue;exit了.



匿名方法引用（reference to）
以前我们创建一个方法引用的时候会很麻烦，尤其是在类中，需要跳出去在别的地方写一段函数，然后再回来继续写。新的语法reference to避免了这种情况的发生，尤其是许多时候其实我们的方法实际上只有一两句的时候，它可以大大加快开发的速度，就像前面的Exit语法加强一样贴心。不过 遗憾的是，这个类lamda方法的语法糖还不够甜。
type  
   TFoo = reference to function(num: Integer): Integer; // reference to Method
var  
   func: TFoo;  
   n: Integer;  
begin  
   func := function(a: Integer): Integer // *NOTE*: Do NOT Write ‘;’
   begin  
     Result := a * a;  
   end;  
   n := func(10);
 

相关阅读 >>

用Delphi通过setupapi.dll列举和停用硬件设备

Delphi下遍历指定目录下指定类型文件的函数

Delphi xe android 判断自己程序是否是前台程序

Delphi uses 子句的写法

Delphi 流分割与合并文件的函数

windows关机函数exitwindowsex使用大全（适用windows所有操作平台）

Delphi tstringlist删除重复项

Delphi双进程监控

Delphi 颜色选取

Delphi createmutex建立互斥对象，并且给互斥对象起一个唯一的名字

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi XE新语法/新功能