#delphi
Вопрос:
Всякий раз, когда я нажимаю на элемент в TVirtualStringTree, дерево прокручивается вверх. Как я могу остановить его прокрутку?
Это свойства, которые я установил, предположительно, это те параметры, которые вас больше всего интересуют.
object vtCodeExplr: TVirtualStringTree Left = 0 Top = 50 Width = 441 Height = 1336 HelpContext = 22 Margins.Left = 5 Margins.Top = 5 Margins.Right = 5 Margins.Bottom = 5 Align = alClient BevelEdges = [] BevelInner = bvNone BevelOuter = bvNone BorderStyle = bsNone Colors.BorderColor = 15987699 Colors.DisabledColor = clGray Colors.DropMarkColor = 15385233 Colors.DropTargetColor = 15385233 Colors.DropTargetBorderColor = 15385233 Colors.FocusedSelectionColor = 15385233 Colors.FocusedSelectionBorderColor = 15385233 Colors.GridLineColor = 15987699 Colors.HeaderHotColor = clBlack Colors.HotColor = clBlack Colors.SelectionRectangleBlendColor = 15385233 Colors.SelectionRectangleBorderColor = 15385233 Colors.SelectionTextColor = clBlack Colors.TreeLineColor = 9471874 Colors.UnfocusedColor = clGray Colors.UnfocusedSelectionColor = 13421772 Colors.UnfocusedSelectionBorderColor = 13421772 DefaultNodeHeight = 27 Header.AutoSizeIndex = 0 Header.Height = 29 Header.MainColumn = -1 Header.MaxHeight = 15000 Header.MinHeight = 15 HintMode = hmHint Images = vilItemImages16x16 Indent = 27 LineStyle = lsSolid Margin = 6 TabOrder = 0 TabStop = False TextMargin = 6 TreeOptions.PaintOptions = [toShowButtons, toShowRoot, toShowTreeLines, toThemeAware, toUseBlendedImages] OnClick = vtCodeExplrClick OnCollapsed = vtCodeExplrCollapsed OnCompareNodes = vtCodeExplrCompareNodes OnDblClick = vtCodeExplrDblClick OnExpanded = vtCodeExplrExpanded OnFreeNode = vtCodeExplrFreeNode OnGetText = vtCodeExplrGetText OnGetImageIndex = vtCodeExplrGetImageIndex OnGetHint = vtCodeExplrGetHint OnInitNode = vtCodeExplrInitNode Touch.InteractiveGestures = [igPan, igPressAndTap] Touch.InteractiveGestureOptions = [igoPanSingleFingerHorizontal, igoPanSingleFingerVertical, igoPanInertia, igoPanGutter, igoParentPassthrough] Columns = lt;gt; end Мне нужно было добавить больше строк, чтобы обновить это редактирование. Надеюсь, этого достаточно.
Комментарии:
1. Какие свойства вы установили для VST? Опубликуйте копию раздела, содержащего VST, в текстовом представлении ваших форм .dfm.
2. @TomBrunberg Смотрите обновление
3. Спасибо, Джон, но это ни о чем не говорит. Я могу только предложить внимательно присмотреться к обработчикам событий.
4. Просто из любопытства, вы нашли то, что поднимает ваше дерево на вершину?
5. @TomBrunberg — Да, но этого не было в обработчиках событий, я перезагружал дерево каждый раз, когда нажимал на элемент. «Да»