Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2013.11.03;
Скачать: [xml.tar.bz2];

Вниз

Выделение строки ListView другим цветом   Найти похожие ветки 

 
Novice   (2013-02-05 21:33) [0]

Здравствуйте! Прошу оч.не пинать за детский вопрос. Нужно сделать
выделение строки другим цветом. Пишу простенький тел.справочник для себя. На форме список с инфой, над ним эдит в который вбиваю фамилию и хочу чтобы она выделилась в списке. Поиск и выделение работает,неустраивает лишь цвет выделения(неконтрастный). Помогите плиз советами, линками!


 
Novice   (2013-02-05 21:35) [1]

Нужно также чтобы старое выделение снималось если выделен уже другой абонент, не было множественных выделений а лишь одно нужное(удовлетв.условию(нач.буквы текста в эдите))


 
Smile   (2013-02-05 21:41) [2]

Выделение строки ListView другим цветом

ListView1.Canvas.Brush.Color:= cl...;
Ответ на тему топика


 
Novice   (2013-02-05 21:54) [3]

Работает, но после выделения другой строки старое не снимается :(


 
Smile   (2013-02-05 22:03) [4]


> Работает, но после выделения другой строки старое не снимается > :(


так это нужно обработать в соответствии с алгоритмом "задумкой" автора,
в топике это недостаточно озвучено :)
вопросы задавайте последовательно, в соответствие с возникновением проблем
:)


 
brother ©   (2013-02-05 22:04) [5]

старое выделение запоминай позиции и перед новой закраской закрашивай старое цветом фона... ну, епрст...


 
Novice   (2013-02-05 22:10) [6]

Пробую так:
if ListView1.Selected<>nil then
begin
ListView1.Canvas.Brush.Color := clBlue;
end
else
begin
ListView1.Canvas.Brush.Color := clWhite;
end;
но пока не кликну на другой строке в синий выделенная вначале не окрашивается :( Можт после закраски item.selected:=false добавить?
Как запомнить старое выделенную строку и вернуть ей прежний вид
и выделить цветом нововыделенную? Что-то никак не соображу :(


 
Novice   (2013-02-05 22:14) [7]

Прикрутил на CustomDrawItem:
if ListView1.Selected<>nil then
begin
ListView1.Canvas.Brush.Color := clBlue;
end
else
begin
ListView1.Canvas.Brush.Color := clWhite;
end;


 
Sha ©   (2013-02-06 00:24) [8]

анализируй значения Item.Selected, Item.Focused



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

Форум: "Начинающим";
Текущий архив: 2013.11.03;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.003 c
4-1268010549
JohnJ
2010-03-08 04:09
2013.11.03
закрепить панель задач


2-1357887539
vrem
2013-01-11 10:58
2013.11.03
Память естся, подскажите как исправить для такого вызова:


2-1360068267
vlad
2013-02-05 16:44
2013.11.03
Bass.dll


3-1293438440
avers_sm
2010-12-27 11:27
2013.11.03
Как передать TIBTransaction в качестве параметра процедуры.


15-1369142209
p
2013-05-21 17:16
2013.11.03
Помогите перевести





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский