c++ 中(word)this在delphi里该如何写

c++ 中(word)this在delphi里该怎么写
c++中有个函数，参数值是用(word)this这个值传入的，把这个函数改成delphi，那这个参数值该怎么写

[解决办法]
procedure test(w:Word);
begin
showmessageFmt('%d',[w]);
end;

test(word(self));
[解决办法]
2字节无符号