掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TOOLバーのFloating解除 (ID：24423)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
procedure TToolDockSite.WMSysCommand(var Msg: TWMSysCommand); begin case Msg.CmdType of SC_CLOSE: begin //この辺りに処理を書く inherited ManualDock(TWinControl(frmMain.FindComponent('cbrArtBoard'))); inherited BoundsRect := Rect(0,0,Width,Height); Msg.Result := 0; //閉じたくないときはこちら end; else inherited; end; end; としてみました。 ToolBarはドッキングサイトに戻ったんですが、ToolButtonが宙に浮いてしまって、メインフォームにフォーカスが戻らなくなったんですが、これは何故おこるんでしょう？
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.