全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:2286
推到 Plurk!
推到 Facebook!

請問ListBox 文字的顏色可以變色嗎?

答題得分者是:st33chen
raiseofevil
一般會員


發表:13
回覆:1
積分:2
註冊:2006-12-09

發送簡訊給我
#1 引用回覆 回覆 發表時間:2009-12-04 11:17:36 IP:61.56.xxx.xxx 訂閱
大家好,我想做一個功能是讓ListBox列表中的符合條件的某幾項列表將之變色

比如ListBox中有10個項目,但只想讓ItemIndex 1,3,5,7,9變成藍色的字,其他維持預設
我現在只能透過設定,改變所有文字的顏色,但無法只改變其中幾項?

若可以做這樣的設定,請告知~謝謝~

=====================
太厲害了,謝謝你 st33chen
編輯記錄
raiseofevil 重新編輯於 2009-12-04 14:19:24, 註解 無‧
st33chen
尊榮會員


發表:15
回覆:591
積分:1201
註冊:2005-09-30

發送簡訊給我
#2 引用回覆 回覆 發表時間:2009-12-04 11:46:37 IP:114.32.xxx.xxx 未訂閱
您好,

用 DrawItem 事件去判斷 index 值後改 font 顏色 看看


==============================
爛好人做到底 :

1. listbox1.style 設為 ownerdraw

2. drawitem 事件 :

with (Control as TListBox).Canvas do begin
if (index mod 2) = 0 then font.Color := clred
else font.color := clblue;
FillRect(Rect);
TextOut(Rect.Left,Rect.Top,(Control as TListBox).items[Index]);
end;




------
IS IT WHAT IT IS
我是 李慕白 請倒著唸.
又想把老話拿出來說, 請用台語發音 : 專家專家全是ROBOT CAR (滷肉腳啦);
都已接手這麼久了, 績效還是那麼爛, 講話還那麼大聲.
編輯記錄
st33chen 重新編輯於 2009-12-04 12:15:34, 註解 無‧
系統時間:2024-05-17 0:32:17
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!