file: ZXIng.ByteSegments for example: ```pascal IByteSegments = Interface function Get(index: integer):TArray<byte>; ``` ```pascal function TByteSegments.Get(index: Integer) : TArray<byte>; begin Result := FList[index]; end; ```