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

Вниз

Изменить цвет строки в компоненте TlistView???   Найти похожие ветки 

 
Jenya   (2005-12-16 22:49) [0]

Здравствуйте....
Столкнулся с проблемой в Delphi нужно в компоненте TlistView изменить цвет выделенной одной строки...
т.е. кнопка при нажатии на которой цвет строки менялся на другой.
Типа :
Tlistview1.Font.color:=clred;

Но это команда меняет цвет всех строк... у нужно только выделенной... а в свойстве Tlistview1.selected. там нет параметра изменяющего цвет.

Если кто знает помогите пожалуйста..
Заранее огромно спасибо.


 
FrykT ©   (2005-12-17 04:39) [1]

Свойство OwnerDraw поставь в True. Далее тебя ждёт  полностью ручная отрисовка на канве. У меня была необходимость такое делать в стиле Репорта.  Обрабатывал OnAdvancedDrawItem. Если еще и Данные  выводиться будут, то скорее всего событие OnAdvancedCustomDrawItem. Но в любом случае, через канвас придётся выводить.


 
SergGG ©   (2005-12-19 13:24) [2]

procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView;
 Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
if Item.Selected = True then
begin
  Sender.Selected.Selected:=false; // Будет виден цвет
  sender.Canvas.Font.Color := ClRed;
end;

end;



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

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

Наверх




Память: 0.45 MB
Время: 0.008 c
15-1149644353
Никос
2006-06-07 05:39
2006.07.02
Общее


3-1146904453
Olleg_ator
2006-05-06 12:34
2006.07.02
Подскажите


1-1148291731
DmitryFox
2006-05-22 13:55
2006.07.02
Окна StayOnTop только поверх окон приложения


15-1149684864
DillerXX
2006-06-07 16:54
2006.07.02
Лицензии лицензии летят...


15-1149483514
Ega23
2006-06-05 08:58
2006.07.02
С Днём рождения! 4 июня





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский