我这段代码哪里错了!HELP

[aqandy]

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'

[folder80]

Top1,Left1 :real;

[jiayodo]

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

[jiayodo]

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

[Seahilly]

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