自定义消息

Windows将消息分成了几块，其中的一块是划分给程序自定义的消息使用的。
自定义的消息其实于WM_APP。当然了，自定义的消息也可以不从WM_APP开始，
但是那样的话，你定义的消息代码有可能和Windows的消息代码重复。所以，
安全起见，自定义的消息，最好还是从WM_APP开始。

 

procedure AdjustFormSize(var AMsg: TMessage); message WM_APP + 1099;

 

procedure TPKForm.AdjustFormSize(var AMsg: TMessage);
begin
 if MaxmizeOnShow then
 begin
 WindowState := wsMaximized;
 RequestAlign;
 end
 else
 WindowState := wsNormal;
end;

 

  PostMessage(Handle,WM_APP+1099,0,0);