Record als Prozedurparameter: Werte direkt übergeben

[KodeZwerg]

Ich mag das TPoint Beispiel.

Delphi-Quellcode:

type
  TPoint = record
    X,Y integer
  end;

function Point( X, Y : integer ) : TPoint;
begin
  Result.X := X;
  Result.Y := Y;
end;