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

Вниз

DBGridEh и его Title   Найти похожие ветки 

 
DelphiLexx ©   (2006-11-22 10:53) [0]

Как в DBGridEh"e сделать так, чтобы названия заголовка было в одну строку, без переноса. По умолчанию так и делается, но как только я меняю TitleHeight на значение отличное от нуля, то строка заголовка, если она не в мещается в колонку переносится на другую строку как от этого избавиться.


 
KilkennyCat ©   (2006-11-22 11:16) [1]

не менять значение TitleHeight на отличное от нуля.


 
DelphiLexx ©   (2006-11-22 11:38) [2]


> не менять значение TitleHeight на отличное от нуля.

Но мне нужно, чтобы высота строки = 18


 
clickmaker ©   (2006-11-22 11:42) [3]

ColumnDefValues.Titles.EndEllipsis?


 
KilkennyCat ©   (2006-11-22 11:42) [4]

Тогда перед изменением заголовка вычислять длину (DT_CALCRECT) и обрезать. то же самое делать при изменении ширины столбца.


 
DelphiLexx ©   (2006-11-22 15:55) [5]


> Тогда перед изменением заголовка вычислять длину (DT_CALCRECT)
> и обрезать. то же самое делать при изменении ширины столбца.
>

При чем здаесь DT_CALCRECT.


 
DelphiLexx ©   (2006-11-22 15:55) [6]


> ColumnDefValues.Titles.EndEllipsis?

Не помагает


 
KilkennyCat ©   (2006-11-22 15:59) [7]

> При чем здаесь DT_CALCRECT.


ты в следующий раз по злосчастному гриду сразу в "Начинаюшие" пиши. Все-таки, надо соблюдать уровень.


 
clickmaker ©   (2006-11-22 16:15) [8]

идем в DBGridEh.pas
находим (у меня стр. 9302)
else if (TitleHeight <> 0) or (TitleLines <> 0) then
         begin
//            FillCellRect(Rect(ARect1.Right, ARect.Top, ARect.Right, ARect.Bottom), Down, CellMultiSelected);
           if Orientation = tohVertical then
             WriteTextVerticalEh(Canvas, ARect1, not DrawTitleByThemes, XFrameOffs, YFrameOffs + 2,
               TitleText, Alignment, tlBottom, EndEllipsis, False)
           else
             WriteCellText {WriteTextEh}(DrawColumn, Canvas, ARect1,
               not DrawTitleByThemes, XFrameOffs, YFrameOffs, TitleText,
               Alignment, tlCenter, True, EndEllipsis, LeftMarg, RightMarg)
         end else

меняем жирный фрагмент на tlTop, False


 
DelphiLexx ©   (2006-11-22 17:15) [9]


> меняем жирный фрагмент на tlTop, False

Нельзя ли как-нибудь не меняя исходника


 
clickmaker ©   (2006-11-22 17:19) [10]


> [9] DelphiLexx ©   (22.11.06 17:15)
>
> > меняем жирный фрагмент на tlTop, False
>
> Нельзя ли как-нибудь не меняя исходника

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


 
KilkennyCat ©   (2006-11-22 22:27) [11]

> Дальше у тебя 2 варианта:

мой вариант тоже неплох. Исходников не требует :)



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

Текущий архив: 2007.01.14;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.051 c
2-1166597452
dasha
2006-12-20 09:50
2007.01.14
как открыть OLE объект


15-1166536538
Torry
2006-12-19 16:55
2007.01.14
Тем, кто знал Торри (собаку) лично


2-1166558170
addi
2006-12-19 22:56
2007.01.14
Мультимедийный таймер


9-1141919342
ЛенаОД
2006-03-09 18:49
2007.01.14
Двойная буфферизация


1-1164162906
KiloBait
2006-11-22 05:35
2007.01.14
StringGrid and Cross-tab