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

Как обвести выделенный объект в TListView?   Найти похожие ветки 

← →
creage   (2005-02-01 19:26) [0]

Понимаю, что вопрос типа ламерских, но кто подскажет, как мне "корректно" обвести, т.е нарисовать квадратную рамку вокруг выделенного (Item.Selected) объекта в ListView? Нужно это для того, чтобы было видно что выделенный объект действительно выделен, а то я по итему кликну - он маркед, а кликну где-то в другом месте формы - он уже не маркед :(! А мне нужно всегда видеть, который из итемов селектед! Искал пути выделения Item.Selected - ничего не нашел(наверное плохо искал). Подскажите, как мне решить эту проблему!


← →
GrayFace ©   (2005-02-01 19:40) [1]

А они ведь на темном фоне рисуются. Чем тебя это не устраимает?


← →
creage   (2005-02-01 20:09) [2]

В смысле? На каком еще темном фоне? У меня все рисуется на белом, если кликнуть иконку - она становится синей(маркед). Как только кликну где-то на другом месте формы - опять обычная иконка(не маркед)! Мне нужно, чтобы при любых действиях я зрительно видел, какой элементу меня сейчас текущий! Как это сделать?


← →
GrayFace ©   (2005-02-01 20:53) [3]

Спутал с ListBox.


← →
GrayFace ©   (2005-02-01 21:11) [4]

Ну как-то так:
procedure TForm1.ListView1AdvancedCustomDrawItem(Sender: TCustomListView;
 Item: TListItem; State: TCustomDrawState; Stage: TCustomDrawStage;
 var DefaultDraw: Boolean);
begin
 if Item.Selected and not (cdsSelected in State) then
   with ListView1.Canvas do
   begin
     Pen.Color:=clHighlight;
     Brush.Style:=bsClear;
     Rectangle(Item.DisplayRect(drLabel));
   end;
end;


← →
GuAV ©   (2005-02-01 21:57) [5]

HideSelection := False;



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

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



Память: 0.46 MB
Время: 0.026 c
4-1105102145
Lucifer
2005-01-07 15:49
2005.02.20
Горячие клавиши


14-1106833107
wl
2005-01-27 16:38
2005.02.20
огромная просьба помочь...


4-1104329917
Tatianka
2004-12-29 17:18
2005.02.20
Как получить код возврата потока, вызываемого из другого прилож?


3-1106207403
Aleksandr_666
2005-01-20 10:50
2005.02.20
BDE Administrator


14-1107272287
PIF
2005-02-01 18:38
2005.02.20
помогите разобраться с NetBios




   Наверх