Delphi XE2 U4 Bug Ja/Nein?

[Sir Rufo]

Es ist wohl eher so, dass man mit dieser Funktion bisher Das Glück hatte, dass diese funktioniert hat.

Ich halte das with auch nicht für grundböse, man muss nur den Einsatz sehr genau planen und die äußeren Variablen, Methoden, etc. möglichst eindeutig halten.

Es gab hier auch schon mal eine Diskussion bzgl. Styleguide und die Benennung von Parametern, lokalen Variablen, etc.

Mit dieser Erkenntnis würde man auf folgendes kommen:

Delphi-Quellcode:

function RectFromSize(aX, aY, aWidth, aHeight: integer): TRect;
begin
  with Result do
  begin
    Left := aX;
    Top := aY;
    Right := (Left + aWidth);
    Bottom := (Top + aHeight);
   end;
end;