[fpc-pascal] Array range overflow in properties

[Ryan Joseph]

Is this a bug in properties and I should be getting an error?

type
	TPixel = record
	  components: array[0..3] of byte;
	  property R: byte read components[10] write components[10];
	end;

Regards,
	Ryan Joseph