delphi刚学，有点不明白地方?

Question

if Message.CmdType and $FFF0 <> SC_MOVE then
  showmessage('saf')
上方面的语句可以正确运行。
if Message.CmdType and true then
  showmessage('saf')
而此句却产生编译错误：Operator not applicable to this operand type
-------------------------------------------------------------------
在vb中应该不会存在此类错误

Answer 1

Message类型是如何定义的,贴出源代码吧!

Answer 2

private
    { Private declarations }   
procedure WMSysCommand(var Message: TWMSysCommand); message WM_SYSCOMMAND;--------------------------------------------------------
procedure Tform1.WMSysCommand(var Message: TWMSysCommand);
begin
  if Message.CmdType and $FFF0 <> SC_MOVE then
  inherited;
end;

Answer 3

你的Message.CmdType不是boolean的数据类型

Answer 4

if Message.CmdType and $FFF0 <> SC_MOVE then
  showmessage('saf')
等下面的
if (Message.CmdType and $FFF0) <> SC_MOVE then
  showmessage('saf')

Answer 5

建议去delphibbs吧,那里高手多如毛,