Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#12

Re: Self selber verändern ... erlaubt?

  Alt 2. Mai 2009, 16:41
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
$2B or not $2B
  Mit Zitat antworten Zitat