我这段代码哪里错了!HELP

Question

w:=screen.Width;
  h:=screen.Height;
  Top1:=(w-form1.Width*2)/2;
  Left1:=(h-form1.height*2)/2;
w、h、Top1、Left1都是Integer是的报错：Incompatible types: 'Integer' and 'Extended'

Answer 1

w:=screen.Width;
  h:=screen.Height;
  Top1:=(w-form1.Width*2) mod 2;
  Left1:=(h-form1.height*2) mod 2;
这样就可以了

Answer 2

不好意思写错了
mod 应该是 div

Answer 3

整数不用“/”做除法，而是 div （整除），为绝对值向下舍入
Top1:=(w-form1.Width*2) div 2;
Left1:=(h-form1.height*2) div 2;