关于类和代码优化

字体大小: 中小 标准 ->行高大小: 标准 中 大 
  
因为指向之类的变量，可以强制转换为父类的变量，因此类似于下面的代码都可以简化：

if Sender is TMemo then

(Sender as TMemo).Text:='Test'

else if Sender is TDBEdit then

(Sender as TDBMemo).Text:='Test';

可以变成如下的代码，以便提高效率：

if Sender is TCustomMemo then

TCustomMemo(Sender).Text:='Test';

因为is和as是效率很低的东东！尽量少用！！

此文章由 http://www.ositren.com 收集整理 ,地址为: http://www.ositren.com/htmls/67880.html