delphi 各新版本特性收集

RAD Studio 2010

【CSDN8月20日消息】根据国外媒体报道，Embarcadero Technologies公司宣布推出RAD Studio 2010。开发者可以利用它提供的便捷的触摸屏开发框架来创建基于触摸GUI界面的程序，包括平板电脑、触摸板和kiosk程序。

该版本提供了如下的新特性和功能：

创建手势识别和触摸控制的程序。

内置了超过30种的手势设定，包括上、下、左、右以及像平移、缩放和旋转。

可以通过VCL Gesture Designer在组件级对手势进行可视化设定和添加。

可以在输入屏幕上建立虚拟触摸板和多语言键盘。

可以在只对代码进行很小的情况下就能将Delphi和C++ Builder程序升级为支持触摸和手势识别功能。

RAD Studio 2010对于触摸程序开发的支持独具特色，因为它可以和多种版本的Windows无缝接合，包括Windows 2000、XP、Vista和Windows 7，而且支持多种输入设备，包括单点和多点触屏幕、触摸笔和鼠标。

触摸操作现在已经变成了现实，而且可以向用户提供更丰富的交互体验。从kiosks和POS机到iPhone和 Windows 7，手势识别功能已经成为使程序更具竞争力的关键特性，因为消费者和商家都认识到了自然输入的便利性。，Embarcadaro公司的Michael Swindell说，随着Delphi和C++ Builder 2010的发布，Embarcadero也将提供一套简单的解决方案，可以向多种Windows平台的程序中加入触摸和手势识别功能。

RAD Studio 2010的其他特性还包括：

支持Firebird。Delphi对其提供了本地支持。Embaracaro声称Firebird是全球应用最广的开源数据库。

新的DataSnap。DataSnap服务器已经扩展到了几乎所有的架构RIA、JEE、RESTful、AIR等等。

支持Windows 7。RAD Studio预计对Windows 7的API提供支持，开发者可以利用其Natural Input库Direct2D图形库。

对IDE环境进行了超过120项改进，提升了开发者的使用体验，提高了工作效率。

小资料：Kiosks，Kiosk ModeKiosk Software广泛用于公共电脑或者嵌入系统（如可以上网的公共电话、ATM、机场自助服务系统、网吧管理软件等），这些程序一般都运行于普通的操作系 统，但为了安全以及防止使用者使用其他的程序，Kiosk一般都会全屏运行并锁住系统的其他程序。虽然IE的Kiosk模式没有锁住其他程序，你仍可以用 Alt+Tab来切换，但通常运行Kiosk程序的地方都不会提供键盘给你，最多只是一个仅供最低需求的虚拟键盘而已。（译/曹巳甲）

Delphi2010新发现-类的构造和析构函数功能

Delphi2010发布了.

虽然凭着对Delphi的热爱第一时间就安装了,但是现在可能是年纪大了,对新事物缺乏兴趣了.一直都没有仔细研究.

今天有点时间试了一下新功能.

本来C#和Delphi.NET是支持类的构造函数/析构函数的(注意不是实例的构造和析构).也就是在模块初始化/卸载的时候会调用.

这样有很多好处,比如说类的静态变量的初始化什么的都可以在这里做.

Delphi For Win32对这方面的需求还不是很大.

第一个原因.历史上旧版Delphi不支持静态变量.只能用Unit的全局变量+类函数来模拟.所以类的构造析构基本没需求.从Delphhi2005还是2006开始才支持Class var的.记得不太清楚了

第二个原因.Delphi的Unit有初始化节和反初始化节(initialization/finalization).很多初始化工作都可以在这里面做.比如说类的静态变量.所以对类的构造函数需求不是很大.

随手试了一下Delphi2010.惊喜的发现不知道什么时候Delphi2010已经开始支持类的构造和析构函数了.易博龙和CodeGear居然在介绍Delphi2010的新变化的同时都没有介绍这个特征.

贴一段代码:

type
  TTest = class
  private
    class var StaticABC : Integer;  //类变量(类似C++的静态变量.但不完全等同)
    var
    FABC : Integer; //普通成员变量
  public
    class constructor Create();//类的构造函数
    class destructor Destroy; //类的析构函数

    constructor Create();   //实例的构造函数
    destructor Destroy; override; //实例的析构函数
  end;

{ TTest }

class constructor TTest.Create;
begin
  StaticABC := 1234;
end;

class destructor TTest.Destroy;
begin

end;

constructor TTest.Create;
begin
  FABC := StaticABC;
end;

destructor TTest.Destroy;
begin
  inherited Destroy;
end;

呵呵.很有意思.虽然以前用Unit的initialization/finalization可以实现.但是如果有了类的构造和析构语法的话代码的可读性会更好.

同时还发现结构体(Record)也可以用一样的语法.可编译通过,但是实际上却没有效果.估计以后会加上这个功能吧

转载的delphi2010新功能

7.安装包标识

第一个图标表示已安装

第二个表示未安装

第三个表示非设计时包

8.拖动调试，这个比较有意思，断点还可以回退。看下面的效果

第一次运行的时候，x的值=150

按住33行的向右箭头不放，拖到32行放开，效果如下图

再F8走一步，x的值就变成200了

更多的Delphi2010新特性，可以参考Delphi 2010 Handbook，非常值得看看。

目前还只有英文版的。

http://m8spy.persiangig.com/.ZqB2Ja51KF/Ebooks/Delphi%202010%20Handbook.pdf

此书配套源码

http://cc.embarcadero.com/Download.aspx?id=27601

Delphi® 2009 新特性

• 增强的DataSnap组件
  DataSnap是一组数据库组件。在Delphi 2009中对其进行了重构。通过DataSnap在客户端中可以如同调用本地函数般的调用远程函数。
• 基础语言特性的增强，增加泛型和匿名函数的支持
• VCL组件的增强，增加了Ribbin Controls（类似office 2008的界面控件）组件，PNG的支持，对现有组件的改进，继续增强对Vista的支持。
• 增加国际化支持。提供了完整的Unicode支持，从IDE到RTL、VCL等整个构架体系已完全迁移到Unicode。同时提供一组本地化工具，方便将程序翻译为各种语言。
• IDE增强，比如提供了新的Class Browser（类浏览器），强壮的构建配置，以及对资源管理器（resource management ）的增强。
• COM和ActiveX开发便得更为友善。
  Delphi 2009完全重构了对COM和ActiveX的支持。现在，COM和ActiveX的开发对开发者而言，已经变得完全透明，拥有完整代码的解决方案（译者注：这部分我没看太懂:(，反正就是说更好用了）。
• 使用VCL组件实现AJAX的开发，想构建普通应用程序一样构建WEB 2.0程序

读帮助文档发现Delphi2009的新特性,象C语言一样用数组方式使用指针.

传统的Pascal指针和数组不是等价概念.不能像数组一样使用下标指针(编译器特殊处理的PChar类型除外).

而C语言中数组就是数组第一个元素的地址.和指针在一定程度上等价.指针所指向的内容也可以象数组一样用下标来访问.

虽然问题不大但是写起代码来就麻烦,而且不直观.

如下代码以往的Delphi只能这样写.

const
  rw = 10;
  rh = 10;
procedure SetRects(lpRect: PRect; dwCount : Cardinal);
var
  I : Integer;
begin
  for I := 0 to dwCount - 1 do
  begin
    lpRect^ := Rect(I*rw, 0, I*rw+rw, rh);
    Inc(lpRect);
  end;
end;

或者非要用下标访问的话就要变通一下.

const
  rw = 10;
  rh = 10;
procedure SetRects(lpRect: PRect; dwCount : Cardinal);
type
  TRects = array[0..0]of TRect;
  pRects = ^TRects;
var
  I : Integer;
  lpRects : pRects;
begin
  lpRects := pRects(lpRect);
  for I := 0 to dwCount - 1 do
  begin
    lpRects[I] := Rect(I*rw, 0, I*rw+rw, rh);
  end;
end;

但是Delphi2009新增了编译开关,允许象C语言一样用下标直接访问数组所指向的元素.

{$POINTERMATH ON}
const
  rw = 10;
  rh = 10;
procedure SetRects(lpRect: PRect; dwCount : Cardinal);
var
  I : Integer;
begin
  for I := 0 to dwCount - 1 do
  begin
    lpRect[I] := Rect(I*rw, 0, I*rw+rw, rh);
  end;
end;

呵呵方便多了.

不过要注意默认是{$POINTERMATH  OFF}的.

目前多数Delphi2009新特性的介绍

2008年09月16日 星期二 10:43

{$POINTERMATH ON}
procedure MoveRects(Rects: PRect; Count: Integer);
begin
   while Count > 0 do
   begin
     MoveRect(Rects[Count - 1]); 
     MoveRect((Rects + Count - 1)^);
     Dec(Count);
   end;
end;

delphi2006语言新特性

内嵌类

内嵌类在类的内部声明，它被大量的应用在.net framework以及面向对象的编程中，它表明一种概念性关联关系，并且避免了命名冲突，它同样支持delphi　win32编译。
定义内嵌类
它使用如下语句定义

type
  className = class [abstract | sealed] (ancestorType)
      memberList
      type
         nestedTypeDeclaration
      memberList
  end;   

当内嵌类定义遇到第一个非标识符时终止，例如：procedure, class, type和所有可见性范围修饰符。内嵌类与容器类同样适用正常的访问、可见性规则。一个内嵌类能存取它的容器类实例的变量（如字段，属性或者方法），但是 它必须要有一个参考对象。一个内嵌类能存取类静态字段（class fields）类属性（class properties）和类静态方法（class static methods）且不用参考对象，但必须遵守delphi可见性规则。
内嵌类不增加容器类的大小，建立一个容器类实例时不会同时建立内嵌类的实例，内嵌类与容器类仅仅是定义的上下文关系。
定义和使用内嵌类
下面的例子演示如何去定义和存取内嵌类的字段和方法。

type
      TOuterClass = class
       strict private
          myField: Integer;
        public
          type
             TInnerClass = class
              public
                myInnerField: Integer;
                procedure innerProc;
             end;

         procedure outerProc;
       end;

在实现内嵌类的innerProc方法时，你必须指定它的容器类的名字，例如：

procedure TOuterClass.TInnerClass.innerProc;
begin
   ...
end;

可以用　.　标志像存取一般的类成员一样去存取嵌套类的成员。例如：

var
   x: TOuterClass;
   y: TOuterClass.TInnerClass;

begin
   x := TOuterClass.Create;
   x.outerProc;
   ...
   y := TOuterClass.TInnerClass.Create;
   y.innerProc;
end;

内嵌常数
常数也可以同样在内嵌类型块中声明，常数块的结束标志与内嵌类块的结束标志一样，关键字或 可见性修饰符。内嵌常数不支持类型常量，如 Borland.Delphi.System.Currency 或Borland.Delphi.System.TDateTime 。它只支持简单类型，如：序数，枚举，字符串，实数等类型。
下面的代码演示声明内嵌常量

type
   TMyClass = class
        const
             x = 12;
             y = TMyClass.x + 23;
        procedure Hello;
        private
             const
                 s = 'A string constant';
    end;
 begin
   writeln(TMyClass.y);   // 输出y的值 35.
end.

delphi2006语言新特性－帮助类

帮助类（Class Helpers）
帮助类是联合其它类的一种类型，它能为联合类（包括它的派生类）增加方法 和过程。它为我们提供了一种不使用inheritance来扩展一个类的能力，你可以在任何地方使用帮助类，编译器自动决定在什么时候使用原始类还是增加 的帮助类。（注意：帮助类只是一种扩展一个类的方法，但是应该仅仅在为实现某种新目的而开发新代码时被使用，而不应该视为一个设计工具被使用。它是绑定语 言和平台RTL的 ）
定义一个帮助类的语法：

type
identifierName = class helper [(ancestor list)] for classTypeIdentifierName
memberList
end;

ancestor list是可选的
一个帮助类不可以定义实例数据，但允许有类字段（class fields）
可见性规则与memberList语法与一般的类一样
一个简单类可定义并联合多个帮助类，然而,只有一个在源代码中特殊位置的帮助类才能被应用。在最近的范围被定义了的帮助类将应用。帮助类的范围是由delphi风格决定的（在单元中uses子句，由右到左）
（呵呵，上面这段翻译的好像不太准，暂且这样吧，欢迎指正）
下面演示定义一个帮助类：

type
TMyClass = class
procedure MyProc;
function  MyFunc: Integer;
end;

...

procedure TMyClass.MyProc;
var X: Integer;
begin
  X := MyFunc;
end;

function TMyClass.MyFunc: Integer;
begin
  ...
end;

...

type 
TMyClassHelper = class helper for TMyClass
procedure HelloWorld;
function MyFunc: Integer;
end;

...

procedure TMyClassHelper.HelloWorld;
begin
  writeln(Self.ClassName); // Self是TMyClass 类, 不是TMyClassHelper
   end;

function TMyClassHelper.MyFunc: Integer;
begin
  ... 
end;

...

var 
X: TMyClass;
begin
  X := TMyClass.Create;
  X.MyProc;    // 调用TMyClass.MyProc
  X.HelloWorld; // 调用TMyClassHelper.HelloWorld
  X.MyFunc;    //调用TMyClassHelper.MyFunc