TQuadruple

type TQuadruple = record

public

type

  TSpecializedQuadruple = TSpecializedQuadruple;

public

  First: TFirst;

  Second: TSecond;

  Third: TThird;

  Fourth: TFourth;

  constructor Create();

  procedure Unpack();

end;