Delphi7. Ввод массива.

[Olga67_net]

Во всех книгах читала, что "Количество элементов массива должно соответствовать указанному в объявлении". Но, объявив массив на 6 элементов, обнаружила, что могу ввести и 7-й и т.д., и никаких сообщений об ошибке. Это как-же так?

var
  Form1: TForm1;
  i:integer;
  Team:array[1..6] of string[15];


procedure TForm1.FormCreate(Sender: TObject);
begin
i:=1;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Team[i]:=Edit1.Text;
label2.Caption:=label2.Caption+#13+IntToStr(i)+'. '+Team[i];
Edit1.Text:='';
i:=i+1;
end;

end.

[megachuhancer]

Чтобы проверялись границы массива, нужно прописать в начале модуля {$r+}
Или установить флажок Project->Options->Compiler->Runtime errors->Range checking

[Utkin]

Сообщение от Olga67_net

Во всех книгах читала, что "Количество элементов массива должно соответствовать указанному в объявлении".

Оно правильно в книгах пишут. Даже если ошибка и не возникнет (по указанным в посте 1 причинам) ничего хорошего из этого не выйдет и есть вероятность, что Вы затрете какие-то другие данные программы (особенно когда данных много). А потом будете долго удивляться, чего это оно не фунциклирует так как хочется .