Virtual StringTree: текст, возвращаемый обработчиком событий OnGetHint, не отображается в окне подсказки.

Я написал обработчик события OnGetHint элемента управления Virtual StringTree, и я уверен, что текст подсказки возвращается, но окно подсказки пустое, см. скриншот ниже, что могло вызвать эту проблему? заранее спасибо.

Скриншот

Настройки управления:

AnimationDuration := 0;
ClipboardFormats.Clear;
ClipboardFormats.Add('HTML Format');
ClipboardFormats.Add('Plain text');
ClipboardFormats.Add('Rich Text Format');
ClipboardFormats.Add('Rich Text Format Without Objects');
ClipboardFormats.Add('Unicode text');
ClipboardFormats.Add('Virtual Tree Data');
DefaultPasteMode := amInsertBefore;
DragOperations := [doCopy, doMove, doLink];
EditDelay := 200;
HintMode := hmHint;
Images := dmImages.lstProjectTree;
IncrementalSearch := isAll;
Indent := 16;
Margin := 0;
ParentFont := False;
PopupMenu := pmTree;
SelectionCurveRadius := 5;
OnCollapsed := treePrjCollapsed;
OnColumnClick := treePrjColumnClick;
OnDblClick := treePrjDblClick;
OnDragAllowed := treePrjDragAllowed;
OnDragOver := treePrjDragOver;
OnDragDrop := treePrjDragDrop;
OnExpanded := treePrjExpanded;
OnFocusChanged := treePrjFocusChanged;
OnGetCursor := treePrjGetCursor;
OnGetText := treePrjGetText;
OnPaintText := treePrjPaintText;
OnGetImageIndexEx := treePrjGetImageIndexEx;
OnGetHint := treePrjGetHint;
OnKeyDown := treePrjKeyDown;
OnMouseDown := treePrjMouseDown;
OnNewText := treePrjNewText;
OnNodeMoving := treePrjNodeMoving;
with Columns.Add do begin
  Position := 0;
  Width := 153;
end;
with Columns.Add do begin
  Layout := blGlyphRight;
  MinWidth := 20;
  Position := 1;
  Width := 20;
end;
with Columns.Add do begin
  Layout := blGlyphRight;
  MinWidth := 20;
  Position := 2;
  Width := 20;
end;
with Columns.Add do begin
  Layout := blGlyphRight;
  MinWidth := 16;
  Position := 3;
  Width := 20;
end;

person Edwin Yip    schedule 19.01.2010    source источник
comment
Если вы так уверены, что настраиваете текст подсказки правильно, докажите это. Покажи код. Также включите хотя бы часть обработчика OnGetText.   -  person Rob Kennedy    schedule 19.01.2010
comment
Извините за ссылку, это: ‹BR› dl .dropbox.com/u/367923/Screenshots/ ‹BR› ‹BR› @Rob, для целей тестирования я использую этот код: ‹br› HintText := 'мой текст подсказки по тестированию'; ‹BR› Более того, если нет текста подсказки, окно подсказки отображаться не будет.   -  person Edwin Yip    schedule 19.01.2010
comment
Привет, я нашел виновника проблемы! Это AnimationDuration := 0;   -  person Edwin Yip    schedule 19.01.2010
comment
Добавь это в качестве ответа, Эдвин. Вы сможете пометить его как принятый ответ. Кроме того, полегче с тегами ‹br›; они не работают в комментариях, а в ответах вы создаете новый абзац с пустой строкой.   -  person Rob Kennedy    schedule 19.01.2010
comment
Роб, я думаю, он доказал это :-)   -  person Francesca    schedule 19.01.2010
comment
Думаю, да, Франсуа. Снимок экрана очень помог в объяснении проблемы. До того, как изображение стало доступно, я ожидал, что оно будет полностью нарисовано, но без текста, и, возможно, оно было нарисовано как очень маленький прямоугольник (как если бы оно было рассчитано на пустую строку). Но на самом деле вся поверхность окна подсказки отсутствовала; это не имело ничего общего с текстом.   -  person Rob Kennedy    schedule 19.01.2010


Ответы (1)


Сам нашел виновника проблемы! Это AnimationDuration := 0

Как предложил Роб, я добавил этот вывод в качестве ответа, чтобы принять его.

person Edwin Yip    schedule 19.01.2010