Self selber verändern ... erlaubt?

[blablab]

Wer will schon ein schönes Delphi-Programm in Java umsetzen

[himitsu]

Zum Glück arbeite ich ja nicht mit Java

@igel457: dann hätt ich aber fast doppelt soviele Funktionen, wie jetzt schon.

Delphi-Quellcode:

Function TMyObject.MachWas(Param: String): Irgendwas;
  Begin
    If Param <> '' Then Self := SucheAnderes(Param);
    Result := MachWasMitDemObjektUndGibErgebnis;
  End;

Delphi-Quellcode:

Function TMyObject.MachWas(Param: String): Irgendwas;
  Var Temp: TMyObject;

  Begin
    If Param = '' Then Begin
      Result := MachWasMitDemObjektUndGibErgebnis;
    End Else Begin
      Temp := SucheAnderes(Param);
      Result := Temp.MachWas('');
    End;
  End;

also auf "meine" Weise hab ich erstmal etwas Code gesparrt und vorallem muß die Funktion dann nicht nochmals aufgerufen werden

[add]
genau

[mjustin]

Zitat von blablab:

Wer will schon ein schönes Delphi-Programm in Java umsetzen

Das wäre ja wie Eulen nach Athen zu tragen

[alzaimar]

Zitat von mschaefer:

OOP ist das schon

Zwei Menschen, drei Meinungen

Ich finde nicht, das es OOP ist, weil das Objekt mit dieser Methodik nicht als Entität exisitiert. Die Methode wird also nicht aus der Sicht des Objektes ausgeführt. Verändert man 'Self' in einer Methode, behandelt man 'Self' auf einmal wie eine anonyme Objektreferenz (wie die üblichen 'p' und 'q' Pointer aus prozeduralen Zeiten)

Allerdings muss man wirklich sagen, das himitsu mich mal wieder (bzw. einmal mehr) dazu bringt, über den Tellerrand zu schauen. Ich kann mir allerdings derzeit kein Szenario vorstellen, bei dem eine Alternative zur 'Self-Ersetzung' nicht in verständlicheren Code münden würde.