Windows消息lparam转换

时间:2016-10-17 23:13:02

标签: delphi delphi-7 pascal

如何在Windows消息中将值转换为与lparam相同的格式?

X := SMALLINT(lParam and $FFFF);
Y := SMALLINT((lParam shr 16) and $FFFF);

所以lparam在Word中转换。如何进行逆向转换?

2 个答案:

答案 0 :(得分:6)

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

答案 1 :(得分:1)

2个字到整数:

(Y shl 16) or X;