у показать подсказку, когда текст ячейки уже полностью показан.
так, на OnCreate формы

procedure TForm1.FormCreate(Sender: TObject);
begin
  VirtualStringTree1.HintMode := hmHint;
  VirtualStringTree1.ShowHint := True;
end;

и OnGetHint

procedure TForm1.VirtualStringTree1GetHint(Sender: TBaseVirtualTree;
  Node: PVirtualNode; Column: TColumnIndex;
  var LineBreakStyle: TVTTooltipLineBreakStyle; var HintText: string);
begin
  HintText := IntToStr(Node.Index);
end;

но ничего не происходит

Обработчик события OnGetHint не запускается, и даже точка останова TBaseVirtualTree.CMHintShow не работает.

что я могу сделать?

Я использую delphi xe3, virtualtreeview 5.2.1.

Спасибо за ответ.

Я последовал за твоим гидом.

Свойства приложения

ShowHint := True // Я проверял, но установил в True на OnCreate явно

Vst уместность

Hintнапример, «Подсказка для всего VST» // да, добавьте бессмысленный намекHintAnimationнапример,hatNoneHintModeнапример,hmHintAndDefault // как видите, на OnCreateShowHint, True// как видите, на OnCreateParentShowHintпри необходимости используйтеFalse если не знаешь // да

Vst мероприятия для реализации

OnDrawHint() // даOnGetHint() // даOnGetHintSize() // да

но ничего не изменилось.
OnGetHint, OnGetHintSize, OnDrawHint не запускаются вообще.
(когда для HintMode установлено значение hmToolTip, а текст отображается не полностью, запускается только OnGetHint)

И да, я прочитал эту документациюVirtualTreeView.pdf.
но все описание о событии точно так же, как ваша цитата.
Мне нужно больше объяснений.

Обновить:

Очень странная вещь.
Я проверил этот другой ПК.

Мой компьютерWindows 10 xe3 vst 5.2.1

не работа

ПК 1Windows 10 xe3 vst 5.2.1

скомпилировать и выполнить // работускомпилировать на моем ПК, скопировать и выполнить // работу

ПК 2Windows 10

скомпилировать на моем ПК, скопировать и выполнить // работу

Какая????
код не был проблемой.
Я не знаю почему и даже с чего начать.

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