Код:
for i := 0 to 4 do
byteArray[i] := i * 5;
Здесь у тебя по 0-му смещению наименьшее значение
Код:
byteArray[0] := StrToInt(Edit1.Text);
byteArray[1] := StrToInt(Edit2.Text);
byteArray[2] := StrToInt(Edit3.Text);
byteArray[3] := StrToInt(Edit4.Text);
byteArray[4] := StrToInt(Edit5.Text);
а здесь уже идёт ввод из Edit-ов, массив перезаписывается. И по 0-му смещению уже нет гарантировано наименьшего значения (что там в Edit-ах введено)