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

delphi一个奇怪的问题，请大家帮忙
一个按钮的点击事件
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
请大家帮帮忙，谢谢



------解决方案--------------------
按下回车的时候 Edit49.Text Edit50.Text 的值是空的啊
所以出错的啊

------解决方案--------------------
应该不是楼上所说的错误：
1. 如果Edit49.Text或Edit50.Text为空，则鼠标单击时也会出错;
2. 如果Edit49.Text或Edit50.Text为空，错误信息应该是 " ... is not a valid integer value "
------解决方案--------------------
Button100的Default是否已设为True?