Delphi, TTreeView: как получить координаты экрана данного узла и его значок?

Question

Пожалуйста, помогите мне получить экранные координаты прямоугольника значка состояния заданного TTreeNode в TreeView (я имею в виду значки, указанные в свойстве TTreeView.StateImages).

Функция TTreeView.GetHitTestInfoAt(X, Y: integer): : THitTests, но это не совсем то, что я ищу; он говорит, соответствуют ли заданные координаты метке или значку или значку состояния элемента, но мне нужно знать, какая часть значка была нажата.

(Причина в том, что я хочу, чтобы реализовать TreeView узлов с двумя флажками для каждого элемента, и я использую StateImages для имитации флажков (одно состояния проверенной вещи, другое состояние непроверенного пункта). Как я понять, какой щелкнуть по одному из этих флажков. Мне нужно сравнить координаты курсора с координатами значка состояния. Как я могу их получить?)

Answer 1

Вы можете отправить сообщение tvm_GetItemRect, в котором будут указаны координаты клиента ограничивающей рамки элемента. Используйте это и то, что вы знаете об относительных положениях текста ярлыка и значков, чтобы определить, куда щелкнули мышь в значке.

Вместо GetHitTestInfoAt вы можете предпочесть отправить сообщение tvm_HitTest, так как оно даст вам информацию об испытаниях и рукоятке элемента одновременно; ручка - это то, что требуется tvm_GetItemRect.

Вам не нужен экран , так как все координаты, которые были задействованы до сих пор, являются координатами клиента, но вы можете позвонить ClientToScreen, если вам действительно нужны координаты экрана.