Irgentwie hat mein Browser gesponnen und ich muß neu weitermachen!
Die von mir gezeigte Form macht in Bezug auf die Variable bj das gleiche wie das Urbeispiel mit einem feinen Unterschied. Was ist, wenn in meinem Objekt bei der Veränderung einer Variablen noch weitere Aktionen ausgeführt werden müssen? Genau dann ist es prima mittels read oder Write Proceduren und Funktionen nutzen zu können. Man übergibt den Parameter und tun dann auch alles nötige in einem Abwasch. Und das schöne, von außen sieht alles gleich aus.
sowohl bei Deinem wie bei meinem Beispiel wird der Wert in Deiner Form1 mit
Auto.Alter := 10;
geändert. Mit der Procedure kann dann aber automatisch noch mehr getan werden.
kleines Bsp.
Du möchtest einen Klartext ändern. Zum Bsp. wie folgt:
Delphi-Quellcode:
procedure SetAlter(Alter : Integer);
begin
bj := Alter;
If bj < 2 then FAlterText := 'neu';
IF (bj > 1) and (bj < 5) then FAlterText := 'noch nicht Schrott';
.
.
.
und so weiter. (die Art der Umsetzung ist jetzt egal, es geht ums Prinzip)
FAlterText währe in deinem Objekt TAuto genauso ein Property auf das man dann vielleicht nur lesend zugreift.
o.k. das wars von mir,
Gruß oki
Zitat
Baum-Darstellung
