delphi一个奇怪的问题，请大家帮忙

Question

一个按钮的点击事件
procedure TFrmTest.Button100Click(Sender: TObject);
var arr: array[0..66] of Char;
begin
  for i := strtoint(Edit49.Text) to strtoint(Edit50.Text) do
  begin
    fillchar(arr, sizeof(arr), 0);
    if GetRecord(i, arr) then
      Memo2.Lines.Add(inttostr(i) + ',' + arr)
    else
    begin
      MsgBoxAAA('失败了', '', 0 + 16);
      break;
    end;
  end;
end;
用鼠标连续点击他，不会出错，但是连续按回车键就出错了，连续按空格键也不
会出错，按回车出错的位置是最后一个end,
提示  access violation ai 0x0043f23b;wirte of address 0x004787ad
请大家帮帮忙，谢谢

Answer 1

补充：var 处少写了 i：integer

Answer 2

按下回车的时候 Edit49.Text Edit50.Text 的值是空的啊
所以出错的啊

Answer 3

应该不是楼上所说的错误：
1. 如果Edit49.Text或Edit50.Text为空，则鼠标单击时也会出错;
2. 如果Edit49.Text或Edit50.Text为空，错误信息应该是" ... is not a valid integer value"

Answer 4

Button100的Default是否已设为True?