Delphi中的除法运算问题

Question

Delphi中的除法运算难道不是用/吗？为什么我运行时总是出问题呢？这样的：
procedure TForm1.Button1Click(Sender: TObject);
var
  i,j:integer;
begin
  i := strtoint(edit1.Text);
  j := i/4;
  edit2.Text := inttostr(j);
end;
运行的时候，就说有错误，错误提示为：
[Error] Unit1.pas(33): Incompatible types: 'Integer' and 'Extended'
可是当把/改为*时就没有错误，请大家帮帮忙看看，这是怎么回事呢？先谢了！

Answer 1

j := i div 4;

Answer 2

j := i/4;你的j是整数，但i/4不一定是正数，
可以用i div 4  
或者
j :=  round(i/4);

Answer 3

终于发现，越简单的问题来的星星越多... ...
http://community.csdn.net/Expert/topic/5016/5016661.xml?temp=.1546747