Delphi VCL 原代码精简一例：（关于 DBGrid 的 EditButton，uses Grids）(0分)

unit Grids;
.........
procedure TInplaceEditList.PaintWindow(DC: HDC);
var
R: TRect;
Flags: Integer;
W, X, Y: Integer;
begin
................
X := R.Left + ((R.Right - R.Left) shr 1) - 1 + Ord(Pressed);
Y := R.Top + ((R.Bottom - R.Top) shr 1) - 1 + Ord(Pressed);
................
end;
其中这两行可以精简为：
X := ((R.Right + R.Left) shr 1) - 1 + Ord(Pressed);
Y := ((R.Bottom + R.Top) shr 1) - 1 + Ord(Pressed);

鸡蛋里找骨头，也不找点好的出来。

这就是问题，效率体现在哪里啊？
冗余代码是一方面，这样的代码可是没有质量啊，
为了求一个矩形的中点，竟然采用：
（右-左）/2 + 左，可见写这样的代码的水平一般了。
本来就是简单的（左+右）/2。
为什么不....
目前市场上面的大多数软件质量就是这样的，
不是吗？那个汉字拼音首字母的函数，到处都是
抄袭来的错误，就是出来的书本也是这样照抄错误，
为什么？不重视产品质量就是没有竞争力的。

接受答案了.