Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2012.01.29;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.006 c
2-1319015376
Псарь
2011-10-19 13:09
2012.01.29
Как сделать оболочку для своего инспектора объектов?


1-1282292479
TComponent
2010-08-20 12:21
2012.01.29
Компонент для сетевой структуры


2-1318595246
Handle
2011-10-14 16:27
2012.01.29
список процедур


1-1283001637
alexjfx
2010-08-28 17:20
2012.01.29
многострочный listbox


1-1283231923
Элия
2010-08-31 09:18
2012.01.29
Как определить виден ли скролл. ListView.