var
  i: Integer;

이렇게 해보면 어떨까요?

박종남 님이 쓰신 글 :
: VC++ 로 만든 ocx 가 있습니다.
: 아래와 같이 아무 처리도 하지않고  값만 반환해 주는 함수 하나를 만들어 놓았구요...
:
: // ocx 함수
: short CmyCtrl::TestF()
: {
: return 1;
: }
:
: //델파이에서 호출
: var
: i : Smallint;
: begin
: i := MyOCX.TestF();
: showmessage(inttostr(i));
:
: 그런데 이상하게 델파이 6 버전에서 반환값을 제대로 받지 못하네요.
: -2880 이런 값이 출력됩니다.
: 버전 7에서는 아무이상 없이 잘 받아지거든요...
: 이게 왜 그런 건지 알 수가 없군요...
: 버전 6에서의 문제인지 검색을  봐도 관련 내용을 찾아볼 수가 없네여.