Форум: "Основная";
Текущий архив: 2012.01.29;
Скачать: [xml.tar.bz2];

Вниз

TJvDBTreeView, хинт (ToolTips) обрезается до 80-ти символов.   Найти похожие ветки 

← →
Дмитрий Белькевич   (2010-08-24 11:17) [0]

Сабж, куда копать?

---

← →
Игорь Шевченко ©   (2010-08-24 11:59) [1]

в исходники, очевидно. JVCL же с исходниками

---

← →
Дмитрий Белькевич   (2010-08-24 13:06) [2]

Самое обидное, что в JVCL вроде бы ничего нету по поводу ToolTips. Предполангаю, что ноги откуда-то из VCL растут. Не в том смысле, что глюк, а в том смысле, что где-то какие-то ограничения на размер стоят.

---

← →
Дмитрий Белькевич   (2010-08-24 15:43) [3]

Таки нашел, что у гугля спросить и гугль ответил:

http://www.rsdn.ru/forum/delphi/2849191.flat.aspx

Из VCL кода:

// Work around NT COMCTL32 problem with tool tips >= 80 characters

---

← →
Игорь Шевченко ©   (2010-08-24 16:50) [4]

нескромный вопрос - а зачем такой длинный хинт ?

---

← →
Дмитрий Белькевич   (2010-09-03 10:47) [5]

Окончательно:

убрал ToolTips.

Добавил в TJvDBTreeView в OnMouseMove:


procedure TForm1.JvDBTreeView1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
var
TempNode: TTreeNode;
begin
TempNode := JvDBTreeView1.GetNodeAt(X, Y);
if Assigned(TempNode) and (FLastNode <> TempNode) then
begin
 FLastNode := TempNode;
 Application.CancelHint;
 JvDBTreeView1.Hint := WrapText(TempNode.Text, 80);
end;
end;


---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2012.01.29;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.003 c