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

Вниз

TCheckListBox   Найти похожие ветки 

 
Марат   (2004-05-28 08:56) [0]

Здравствуйте, мастера. Вопрос в следующем:
procedure TFix_Appl_wr_f.CLB_DVOClickCheck(Sender: TObject);
var ind,i,j,f: integer;
begin
ind:=CLB_DVO.ItemIndex;
if CLB_DVO.Checked[ind]=true then
begin
for i:=0 to Cou_f-6 do begin
if DVO_Array[ind,i]="n" then
CLB_DVO.ItemEnabled[strtoint(DVO_Array[ind,i-1])-1]:=false;
end;
end
else
begin
for i:=0 to Cou_f-6 do begin
if DVO_Array[ind,i]="n" then
CLB_DVO.ItemEnabled[strtoint(DVO_Array[ind,i-1])-1]:=true;
end;
for j:=0 to Cou_r-1 do begin
if CLB_DVO.Checked[j]=true then
begin
for i:=0 to Cou_f-6 do begin
if DVO_Array[j,i]="n" then
CLB_DVO.ItemEnabled[strtoint(DVO_Array[j,i-1])-1]:=false;
end;
end;
end;
end;
...
т.е. если при щелчке по одной из строчек в TCheckListBox проверяется совместимость этой строчки с другими, и если какая-то из строк не совместима, то она становится неактивной. А мне хочется чтобы + к этому изменился цвет неактивной строки, например на красный. Можно ли это сделать, и если можно то как?


 
Sandman25+1   (2004-05-28 09:21) [1]

Style
OnDrawItem


 
Марат   (2004-05-28 09:33) [2]

Если не жалко, можно подробнее?
Какой Style нужно выбрать?
И что прописать в OnDrawItem?


 
Sandman25+1   (2004-05-28 10:47) [3]

[2] Марат   (28.05.04 09:33)

У Вас не работает F1? Там и пример есть, и подробное объяснение...


 
Марат   (2004-05-31 06:04) [4]

Я конечно дико извиняюсь. Посмотрел, но ничего не понял. Просто я не такой уж "продвинутый".


 
Sandman25+1   (2004-05-31 09:33) [5]

http://delphimaster.ru/cgi-bin/faq.pl?look=1&id=988625432&n=17

Только вместо рисования картинки нужно будет закрасить область нужным цветом.



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

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

Наверх





Память: 0.45 MB
Время: 0.031 c
3-1084983087
ceval
2004-05-19 20:11
2004.06.13
после перемещения столбцов не работает поиск по двум полям


1-1085768409
FuTe
2004-05-28 22:20
2004.06.13
dll


14-1085233214
ricks
2004-05-22 17:40
2004.06.13
Орфография


14-1085836974
Drakon
2004-05-29 17:22
2004.06.13
Перенос Linux-приложений на Linux


11-1075137019
NavigatorV
2004-01-26 20:10
2004.06.13
Компонент TKOLMHDateTimePicker





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