Сворачивание и разворачивание дерева на активной вкладке через меню

2019-01-20 13:59:11 +08:00
parent 43d2f180fd
commit ddb1d7ca8f
2 changed files with 34 additions and 4 deletions
--- a/dmain.lfm
+++ b/dmain.lfm
@@ -3628,6 +3628,7 @@ object dmMain: TdmMain
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
        }
        ImageIndex = 21
+        OnClick = mbCollapseTreeClick
      end
      object mbExpandTree: TMenuItem
        Caption = 'Развернуть'
@@ -3668,6 +3669,7 @@ object dmMain: TdmMain
          FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
        }
        ImageIndex = 22
+        OnClick = mbExpandTreeClick
      end
    end
    object mbCheck: TMenuItem