比如:
  TMyEdit = TEdit;
  TMyString = String;
  TMyMemoryStream = TMemoryStream;
或者:
  TMyEdit = Class( TEdit )
  end;
前面一个是别名,后面一个是新的类。

解决方案 »

  1.   

    还有,最好看看 Rfc 的文档,了解各种协议到底是怎么一回事.
    比如:Pop3协议,Smtp协议,Ftp了解了解这些,当你自己需要定义
          一些协议的时候可以借鉴一下。
      

  2.   

    用控件名有什么不好?控件名不是自己定义的吗,把它定得短一些就可以了(虽然不符合软件工程:))。
    实在需要的话:(以TLabel为例:)
    var lbltmp : TLabel;
    begin
      lbltmp := YouLabel; 
      ...
    endl
      

  3.   

    to all:
    有时候要对一组name有规律的控件进行操作,可是又不能想操作数组一样对控件进行操作,
    如果能够在给静态创建的控件加上别名如vb一样那将是很方便的.这个问题看来很难解决.
      

  4.   

    例如一组label控件:(1-10)
    for i:=1 to 10 do
      (FindComponent('label'+IntToStr(i)) as TLabel).Font.Color := clRed;