program tst_arr;
type
TElem = (e1, e2, e3);
TElemStr = array[TElem] of char;
var
elStr: TElemStr = '12';
begin
end.
This is compiled by FPC. Lazarus 2.3.0 (rev main-2_3-1386-g23b2324f9f) FPC 3.2.3 x86_64-linux-gtk2.
If elStr has 4 chars - error is detected, if 2 - not detected. 2 items is error - elStr must have 3 chars.