从另一个考虑来看代码的风格(2)

2008-04-10 02:58:00来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折


1)


var


r:integer;


begin


r:=(strtoint(edit1.text) strtoint(edit2.text))*strtoint(edit3.text);


end;


2)


var


r,a1,a2,a3:integer;


begin


a1:=strtoint(edit1.text);


a2:=strtoint(edit2.text);


a3:=strtoint(edit3.text);


r:=(a1 a2)*a3;


end;


那个更容易理解呢?更直白呢?


当然是第二个。


再例如


1)


dim a1 as long


a1=text1.text


dim a2 as long


a2=text2.text


dim a3 as long


a3=text3.text


dim r as long


r=(a1 a2)*a3


2


dim r as long, a1 as long, a2 as long, a3 as long


a1=text1.text


a2=text2.text


a3=text3.text


r=(a1 a2)*a3


那个更好呢?


之所以说Pascal语言很美就是体现在你必须按照比较规范的方式来写代码。在哪里声明,哪里定义函数,过程都要按部就班的来。不是说其他语言办不到,而是其他语言要求松一些罢了。


代码的得风格中可读性是十分重要的,不要自己耍小聪明。玩弄了一些花招技巧这是软件开发的大忌。记得当时在大学时代有的同学用

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:用delphi制作抖动窗体

下一篇:Web Application 開 發 利 器 - WebSnap(八)