Problemas con ocx

[Casimiro Notevi]

Empezado por escorpionrojo43

[dcc32 Error] Unit1.pas(40): E2033 Types of actual and formal var parameters must be identical

para detallar mas aqui esta parte del codigo. puse la parte mas simple para partir de ahi.

este es mi codigo
Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject); var lRet: LongWord; begin lRet := vmaxrd1.AbrirPuerto(1); end;



esta es la funcion que llama declarada en la libreria
Código Delphi [-]function TVMAXRD.AbrirPuerto(var numPuerto: Smallint): Integer; begin Result := DefaultInterface.AbrirPuerto(numPuerto); end;


quien me dice lo que esta pasando ahi?

Ya lo dice el mensaje del error, los parámetros deben ser del mismo tipo.