Meine Vorredner haben vollkommen recht.
Um das Beispiel nochmal genauer zu erklären:
Delphi-Quellcode:
procedure TZitrone.ZFarbe(a: String);
begin
if (LowerCase(a) = 'grün') or (LowerCase(a) = 'gelb') then
FZitronenfarbe := a
else
FZitronenfarbe := 'gelb';
end;
Diese Prozedur lässt also nur grün und gelb als Farbe zu. Dadurch kann man die Eingabe von unsinnigen Werten (z.B. blau) oder Fehlereingaben verhindern. Netürlich kann man innerhalb der Prozeduren alle möglichen Dinge machen: Berechnungen, Loging etc. pp.