Delphi-Quellcode:
interface
var
Ergebnis: dreierOut;
Result: integer;
procedure TForm1.berechneWas;
Globale Variable: NEIN, schäm dich
* als VAR-Parameter, OUT-Parameter (Letzters nur für einfache Typen, ala Integer ... NICHT für String)
* als Result geht es natürlich auch
* oder als Feld (Variable) in einer Klasse, wenn man Variablen und diese Funktion/Prozedur darin verpackt
* oder ...