Record mit class operator als verknüpften String ausgeben

[Uwe Raabe]

Versuchs mal hiermit:

Delphi-Quellcode:

class operator TPosition.implicit(aValue: TPosition): string;
var
  s1, s2, s3: string;
begin
  s1 := aValue.K1;
  s2 := aValue.K2;
  s3 := aValue.K3;
  Result:= s1 + ';' + s2 + ';' + s3;
end;