奇怪的Pascal问题

Question

不懂pascal，现学现卖的写了一小段程序。

unit TestUnit;

interface

    function div2(a : LongInt; b : LongInt) : LongInt;

implementation

function div2(a : LongInt; b : LongInt) : LongInt;

begin

   Result := a div b;

   if (a mod b) > 0 then

   begin

      Inc(Result);

   end;

end;

end.

奇怪的是一直出现 Identifier not found "Result"的错误，如果把Result改成div2，则一切都正常。。。。。有懂pascal的先进指点一下迷津吧？
问题补充

tapestry1122 写道

night_stalker 写道

我也不懂，不过感觉需要

var
  Result: LongInt;

不需要

lz，我在d7里能编译过你的这段代码啊。

奇怪，Free Pascal死命的报错，我用Prism试看看。。。

Answer 1

google:

you have to activate the Delphi or ObjFPC compilation mode.