我在窗体里用了BusinessSkinForm,在最小化,关闭时..窗体无法隐藏的问题!procedure WMSysCommand(var Message: TMessage); message WM_SYSCOMMAND;procedure TForm1.WMSysCommand(var Message: TMessage);
begin
 case Message.WParam of
   SC_CLOSE:   ShowMessage('CLOSE'); // 点击关闭按钮
   SC_RESTORE: Showmessage('RESTORE');//点击恢复按扭
   SC_MAXIMIZE:Showmessage('MAXIMIZE');//点击最大化按扭
   SC_MINIMIZE:Showmessage('MINIMIZE');//点击最小化按扭
 end;
没有加BusinessSkinForm时,是可以跑进WMSysCommand()函数的.
但是一加BusinessSkinForm..上面的函数就进不去了.同时.想隐藏visible := False;  也就没有办法了..
看了一下BusinessSkinForm..好象是在里面的
procedure TbsSkinStdButtonObject.DoMax;
begin
  if Parent.WindowState = wsMaximized
  then Parent.WindowState := wsNormal
  else Parent.WindowState := wsMaximized;
end;procedure TbsSkinStdButtonObject.DoMin;
begin
  if Parent.WindowState = wsMinimized
  then Parent.WindowState := wsNormal
  else Parent.WindowState := wsMinimized;
end;procedure TbsSkinStdButtonObject.DoClose;
begin
  Parent.FForm.Close;
end;
但是改了一下,没有反应...
不知道你们有没有最到过这个问题.并是怎么解决的.谢谢!