Вниз
Скачать: CL | DM;

Возможно ли установить разный шрифт в разных подменю TreeView?   Найти похожие ветки 

← →
Yuraz ©   (2003-07-29 11:42) [0]

Хотя бы цвет?


← →
Zergling ©   (2003-07-29 11:50) [1]

>> в разных подменю TreeView?

т.е. каждая ветка свои светом? Думаю не прокатит.


← →
Caligula   (2003-07-29 11:55) [2]

Можно сделать что-нибудь в этом роде, если создать свой класс - наследник обычного TTreeView... Но конкретной схемы или исходника этого дела у меня нет.


← →
ZrenBy ©   (2003-07-29 12:02) [3]

procedure TfDep.twCustomDrawItem(Sender: TCustomTreeView;
Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
if(cdsSelected in State)then begin
(Sender as TTreeView).Canvas.font.Color := $0000FF00;
(Sender as TTreeView).Canvas.Font.Name := "Courier";
(Sender as TTreeView).Canvas.Font.Size := 18;
end;

if(Node = ...


← →
Yuraz ©   (2003-07-29 12:56) [4]

ZrenBy © (29.07.03 12:02)
Воспользовался твоим советом, одно но, если размер меняю, то потом обратно отрисовывается, но уже на том большом шрифте. Т.е. не менять размер, и будет нормально. За совет спасибо!
Ещё бы узнать как например, я добавляю субменю
JustAddedNode: TTreeNode;
Как именно его отрисовать другого цвета, а другие не отрисовывать?


← →
ZrenBy ©   (2003-07-29 13:08) [5]

if(Node.Parent <> nil)then begin
(Sender as TTreeView).Canvas.font.Color := $0000FFFF;
(Sender as TTreeView).Canvas.Font.Name := "Courier";

if(Odd(Integer(Node.Data))=True)then begin
(Sender as TTreeView).Canvas.Font.Style := [];
end else begin
(Sender as TTreeView).Canvas.Font.Style := [fsItalic];
end;
end;

В Node.Data я храню нужную мне информацию


← →
KSergey ©   (2003-07-29 13:12) [6]

С назначением размера шрифта в TreeView заморочка есть: стандартный компонен для этого не рассчитан, и хотя отрисовать можно, но часть надписи будет "не кликабельной", т.е. не верно будет определяться размер листа дерева. Что-то такое мне на памяти смутно всплывает...


← →
Calm ©   (2003-07-29 13:26) [7]

А еще посмотри сколько твоя прога занимала памяти ДО отрисовки и ПОСЛЕ. А еще после 10 пересовок.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c
1-33136
ВАО
2003-07-26 15:46
2003.08.11
Delay(...) в каком модуле описана


14-33314
alenka
2003-07-24 10:26
2003.08.11
Раннее и позднее связывание


7-33386
boa
2003-05-29 11:25
2003.08.11
Вопрос по TService


1-33186
Михаил
2003-07-28 17:06
2003.08.11
Одна форма должна находиться под другой


1-33156
Альф
2003-07-25 16:12
2003.08.11
Как ограничить перемещение по гриду ???




   Наверх