Windows消息lparam转换

nup*_*nup 1 delphi pascal delphi-7

如何将值转换为与lparamWindows消息中的值相同的形式?

X := SMALLINT(lParam and $FFFF);
Y := SMALLINT((lParam shr 16) and $FFFF);
Run Code Online (Sandbox Code Playgroud)

所以lparam转换成Word.如何进行逆向转换?

Ser*_*yuz 6

您可以MakeLParam()Windows单元中使用该功能,它将使代码更易于编写和理解.