Delphi - T R I V I A L (trabajo con delphi 3)

BUENO, AL DARLE COMPILAR APARECE ESTE ERROR EN ESTE REGLON:
function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
Y EL ERROR DICE:
Undeclared Identifier: HResult

Y ESTA ES LA FUNCION COMPLETA:
function TLRU.QueryInterface(const IID: TGUID; out Obj): HResult;
const
E_NOINTERFACE = LongInt($80004002);
begin
if GetInterface(IID, Obj) then
Result := 0
else
Result := E_NOINTERFACE;
end (*QueryInterface*);
QUISIERA SABER PORQUE MARCA ERROR Y QUE ES LO QUE HAY QUE AGREGAR.
Gracias.