‘Invalid typecast’ 是怎么回事，编译器出毛病了？

Question

我定义了一个函数，这就是编译出错的根源procedure Tform2.MidText(A,B:string);
  begin
    invalidate;
    canvas.font.name:='BankGothic Lt BT';
    canvas.font.size:=18;
    canvas.textout(integer(500-length(A)*500/52),200,A);   //此行出错
    canvas.font.size:=22;
    canvas.textout(integer(500-length(A)*500/44),280,B);   //此行出错  end;

Answer 1

canvas.textout(integer(500-Trunc(length(A)*500/52)),200,A);   //此行出错
canvas.font.size:=22;
canvas.textout(integer(500-Trunc(length(A)*500/44)),280,B);   //此行出错

Answer 2

回复3楼：为什么求整函数有时候是integer，有时候是trunc呢？

Answer 3

"/"  用于浮点除, 整除应该是div500- length(A)*500 div 44

Answer 4

Integer(3.5);这个是错误的，不支持，浮点变整形，用Round()或Trunc()
Integer(X)这种形式只能是用于转换下表示，比如把句柄或指针变成整形Integer(Handle)/Integer(Point)

Answer 5

楼上说的对。。
还有一个取整函数是int()