Eigenschaften in Zusammenhang mit Methoden mit Rückgabewert

[FriendOfDelphi]

Zitat von DeddyH:

Der Getter gibt den aktuellen Wert der Property zurück (Funktion), der Setter soll den Wert neu setzen (Prozedur). Es steht Dir aber frei, im Setter ggf. eine Exception zu werfen, dann weißt Du, ob die Zuweisung funktioniert hat.

Wenn ich die Fehlerbehandlung über eine Exception abwickle, müsste ich z.B. eine öffentliche Variable "Error" einführen.
Dann würde dies innerhalb der Setter-Prozedur stehen:

Delphi-Quellcode:

try
 if (value<10) then
   begin
     TestProp := 1;
     Error :=0;
   end;
except
  Error := 1;
end;

Ich hätte aber lieber im aufrufenden Quellcode eine Rückmeldung wie:

Delphi-Quellcode:

[...]
Mache irgendwas...
Ergebnis:=SetTestProp(9); //Ergebnis soll dann gleich 0 sein

Ergebnis:=SetTestProp(99); //Ergebnis soll dann gleich 1 sein
[...]

Geht das auch?

[DeddyH]

Nochmal: der Setter ist immer eine Prozedur. Du könntest aber verschiedene Exception-Klassen definieren und diese dann entsprechend auslösen. Im aufrufenden Programm brauchst Du dann einen try-except-Block. Ungetestet:

Delphi-Quellcode:

type 
  EValueTooSmall = class(Exception);
  EValueTooLarge = class(Exception);

procedure TDeineKlasse.SetTestProp(const value: integer);
begin
  if value < 10 then
    raise EValueTooSmall.Create('Der Wert muss mindestens 10 betragen.')
  else if value > 100 then
    raise EValueTooLarge.Create('Der Wert darf maximal 100 betragen.')
  else
    FTestProp := value;
end;

[Sir Rufo]

Zitat von FriendOfDelphi:

Zitat von DeddyH:

Der Getter gibt den aktuellen Wert der Property zurück (Funktion), der Setter soll den Wert neu setzen (Prozedur). Es steht Dir aber frei, im Setter ggf. eine Exception zu werfen, dann weißt Du, ob die Zuweisung funktioniert hat.

Wenn ich die Fehlerbehandlung über eine Exception abwickle, müsste ich z.B. eine öffentliche Variable "Error" einführen.
Dann würde dies innerhalb der Setter-Prozedur stehen:

Delphi-Quellcode:

try
 if (value<10) then
   begin
     TestProp := 1;
     Error :=0;
   end;
except
  Error := 1;
end;

Ich hätte aber lieber im aufrufenden Quellcode eine Rückmeldung wie:

Delphi-Quellcode:

[...]
Mache irgendwas...
Ergebnis:=SetTestProp(9); //Ergebnis soll dann gleich 0 sein

Ergebnis:=SetTestProp(99); //Ergebnis soll dann gleich 1 sein
[...]

Geht das auch?

Dann schreib dir doch sowas ...

Es geht aber NICHT als Setter einer Property

[dominikkv]

Kleine Frage: Wie stellst du dir das vor? Wie willst du das "Ergebnis" bekommen?

Delphi-Quellcode:

// Normal, mit Procedure als Setter:
Klasse.Eigenschaft := 10;

// Ausgedacht, mit Funktion als Setter:
Ergebnis := Klasse.Eigenschaft := 10;

Denk doch mal kurz darüber nach.

[himitsu]

Zitat von FriendOfDelphi:

Wenn ich die Fehlerbehandlung über eine Exception abwickle, müsste ich z.B. eine öffentliche Variable "Error" einführen.
Dann würde dies innerhalb der Setter-Prozedur stehen:

Wenn das so ist, dann ist deine Vorgehensweise aber falsch.

Wenn du beim Setzen von etwas einen Rückgabewert willst (abgesehn von Exceptions), dann kannst du das eben nicht über ein Property lösen.
Ein Property kennt eben nur einen Rückgabewert (Getter) oder einen Parameter (Setter).

In soeinem Fall mußt du eben eine Methode nutzen
funktion setzeWert(x: Integer): Boolean; .



Die Einzige andere Alternative wäre, wenn man einen Callback einführt, welcher bei einem Fehler aufgerufen wird.

Aber direkt als Antwort auf das fehlerhaftes Setzen eines Property bleibt, bleibt eben nur die Exception.
Da allerdings eine Exception, zur Steuerung des Programmflußes, ungern gesehn ist, kommt man wieder bei der Variante mit der Methode an.