ist ein custom write möglich?

[kagi3624]

Hallo,

kann man bei einer property die write (funktion?) umdefinieren?

Also ich möchte ungefähr sowas haben:

property Name : String read fName write trim(fName);

...also dass ich noch auf die Werte noch irgendwelche Funktionen werfen kann.

Danke!

[haentschman]

Moin...

Sichwort: Setter

auf die Schnelle: https://delphi-lernen.de/de/index.php?mid=203&vr=2

[stahli]

Suche mal nach "Getter" und "Setter".

Getter sind lesende Funktionen, die statt einem Lesen eines Propertywertes ausgeführt werden.
Setter sind entsprechend schreibende Prozeduren.

Du Kannst damit z.B. so etwas lösen:

Delphi-Quellcode:

procedure TPerson.setFirstNamne(Value: string);
begin
  fFirstName := Trim(Value);
end;

[Dennis07]

Ich denke er redet davon, in einem Typennachfahr die Read-/Write-Klauseln einer Eigenschaft neu zu definieren, ohne die Eigenschaft zu überschreiben. Und das geht nicht. Du kannst die Signaturen oder Les-/Schreibbarkeit einer Eigenschaft nicht überschreiben, sondern nur deren Sichtbarkeit.

[kagi3624]

Wozu braucht man diese properties dann noch?

[Dennis07]

Zitat von kagi3624:

Wozu braucht man diese properties dann noch?

Eigenschaften sind eine Kürzere Schreibweise für Methoden. Sie sind "pseudo-Variablen", die zum Lesen, Schreiben oder beidem entweder auf echte Member-Variablen, oder auf Methoden verweisen.

Eigenschaften können:

1. in ihrer Sichtbarkeit in abgeleiteten Klassen erhöht werden, indem sie ohne einen Typen und ohne eine Read-oder Write-Klausel in der Kindklasse neu deklariert werden
2. auf virtuelle Methoden verweisen, die in Kindklassen überschrieben werden können
3. von der RTTI aus gelesen und analysiert werden und sind somit in Published-Abschnitten zulässig

Das wars. Mehr ist da nicht möglich. Sie sind also so gesehen nur "semantischer Zucker".

[Der schöne Günther]

Zitat von kagi3624:

Wozu braucht man diese properties dann noch?

Kein Mensch braucht die. Sie haben keinen Mehrwert und eigentlich nur Nachteile. Die Code-Vervollständigung gibt dir keine Auskunft ob eine Property nur les-, nur schreibbar oder beides ist. Du kannst Properties nicht als var - oder out -Parameter übergeben.

Das sieht man z.B. auch daran dass Sprachen wie Java keine Entsprechung zu Delphi-Properties haben da man wohl gemerkt hat dass man mit einer einfachen Variable oder getXXX() und setXXX()-Methoden besser fährt.

[hoika]

Hallo,

Zitat:

Wozu braucht man diese properties dann noch

z.B.

property Active: Boolean Read GetActive write SetActive;

Delphi-Quellcode:

procedure SetActive(Wert: Boolean);
begin
  if FActive=Wert then
  begin
    // keine Änderung notwendig
    Exit;
  end;

  if Wert=False then
  begin 
    InternalCloseFile;
    FActive:= False;
    Exit;
  end;

  if FFileName='' then
  begin
    // ev. Log
    Exception.Create('FileName not set');
  end;

  if not FileExists(FFileName) then
  begin
    // ev. Log
    Exception.Create('File does not exist');
  end;

  InternalOpenFile;

  FActive:= True;
end;

Hier wird nicht einfach nur FActive gesetzt, sondern es werden noch einige Randbedingungen geprüft.

[hoika]

Hallo,
und ich benutze die Properties auch sehr gern, um in die Set-Methode Breakpoints zu setzen,
um die Stelle schnell zu finden, wo eine Variable(hier Property) gesetzt wird.

[haentschman]

if Wert=False then ...sowas gehört mit dem Klammerbeutel gepudert.