Ich glaube, dass es seinen Ursprung hier hat (Bsp zur Verdeutlichung)
Delphi-Quellcode:
type
TPerson = class
private
Age: Integer
public
procedure setAge(AAge: Integer);
end;
procedure TPerson.setAge(AAge: Integer):
begin
Age := AAge;
end;
Bei dieser Zuweisung kann man kein Age := Age machen, da die Sichtbarkeit von innen nach außen hin aufgelöst wird (Funktionsparameter -> Klassenfelder -> Globale Variablen -> ...)
Ich find das aber eher unschön; da gibts auch eine einfache Lösung dafür:
Delphi-Quellcode:
procedure TPerson.setAge(Age: IntegeR);
begin
Self.Age := Age;
end