提高软件执行效率的几条原则

似乎有很多朋友对于我说的“避免使用WITH语句”持反对意见。理由是With语句可以提高执行效率。 
    的确With是可以稍微提高一些执行效率，但是这是以破坏代码可读性的代价来换取的，尤其是多个WITH语句嵌套在一起的时候。
    其实，如何提高执行效率主要还是在你所写下的代码里。以下是我总结的几条提高执行效率的例子，请大家指正：


  一、尽量避免使用重复的语句块： 
    我们来看一段代码：


        //假设已经有var的声明： Loop, LoopChild: Word; 
        //ArrayA, ArrayB: array[0..100] of Char; 
        //Value: Char;


      for Loop := 0 to 100 do 
        ArrayA[Loop]:= ArrayB[Loop]; 
      for Loop := 0 to 100 do 
        begin 
          Value:= ArrayA[Loop]; 
          for LoopChild := 0 to 100 do 
            ... 
        end;


    其实这个就是重复的语句块的执行了，上面的代码我们可以写成：


      CopyMemory(@ArrayA[0], @ArrayB[0], SizeOf(ArrayA)); 
      for Loop := 0 to 100 do 
        begin 
          Value:= ArrayA[Loop]; 
          for LoopChild := 0 to 100 do 
            ... 
        end;


  二、尽量不要使用 i:= i + x;这样的语句 
    在DELPHI里高效率的替代语句是Inc(i, x);等同于C中的i += x;


  三、尽可能的减少运算次数


    如复制字符串的右边部分：s:= Copy(Text, 3, Length(Text) - 2); 
    我们可以替代成：s:= Copy(Text, 3, MaxInt);


    因为不管你传进去的拷贝长度是否越界，COPY函数内部都会做一次检查，反正都是要检查的，干脆用长一点不是很好吗，而且LENGTH（）这里多调用了一次函数判断字符串的长度。


  四、不使用if Flag = True then 这样的语句 
    原因很简单，因为FLAG本来就是BOOLEAN类型的变量，完全没有必要提取他的值来和True比较，直接写成 
      if Flag then 可以有效的减少执行时间；


    同理：


      if Value = 0 then 
        Result:= True 
      else 
        Result:= False;


    这样的语句也可以直接写成: Result:= Value = 0;


  五、尽量减少子程序间的嵌套调用 
    其实这和提高可读性是矛盾的，过多的在子程序内部嵌套调用其他子程序是会影响执行效率的； 
    （所谓嵌套调用就是，比如有10个函数a1, a2, a3, a4, a5, a6, a7, a8, a9, a10; 那么在a1中调用a2,在a2中调用a3...这就叫嵌套调用） 
    至于怎么和可读性去协调，那么就要看实际情况了，不过我还是推荐以注意可读性为优先


  六、尽可能使用整数运算来替代浮点运算 
    比如 Trunc(a / b) 如果可能的话，优先选择写成 a div b比较好（前提a, b都是整数）


  七、循环次数多的循环尽可能的放在循环嵌套的内部


    如：for i := 0 to 100 do 
          for j := 0 to 5 do 
            ... 
    应该尽量写成: 
      for j := 0 to 5 do 
        for i := 0 to 100 do 
          ... 
    因为每次循环前都需要对循环变量进行初始化操作，把循环次数多的循环放在内循环可以有效的减少这个操作，从而提高执行效率。


    另外，大数据量的分页显示；直接的内存操作等等都可以有效的提高软件的执行效率……


    以上是我暂时所能想到的了，呵！或许还有没有想到的，希望大家补充，也欢迎大家批评错误，谢谢！






本文已阅读 4607 次
来自: CnPack 开源软件项目