WM_nclButtonDblClk响应标题栏事件_message

功能说明：WM_nclButtonDblClk响应标题栏事件
{在private上面写}
proceduremy_nclButtonDblClick(varMsg:TWMNCLButtonDblClk);
message WM_nclButtonDblClk;

procedureTForm1.my_nclButtonDblClick(varMsg: TWMNCLButtonDblClk);
begin
    Application.MessageBox('你双击了标题栏','提示', MB_OK+MB_ICONINFORMATION);
end;

通过 Wiz 发布