Здравствуйте! Не получается добавить элемент в середину массива, подскажите пожалуйста где ошибка.

code:
SetLength(ArrStr, 5);
ArrStr[0] := 'A';
ArrStr[1] := 'B';
ArrStr[2] := 'D';
ArrStr[3] := 'E';
ArrStr[4] := 'F';

SetLength(ArrStr, 6);
Move(ArrStr[2], ArrStr[3], Sizeof(ArrStr[2])*3);

Если вывести массив то получим A B C D D E F Если же дописать ArrStr[2] := 'C'; и снова вывести массив, то выводится какая то ерунда; Например A B C D 3 E F ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=82876