2017-01-16 51 views

回答

1

嘗試設置CompLabel.Font.Color

if Index = 1 then 
begin 
    CompLabel.Font.Color := clRed; 
end 
    else 
begin 
    CompLabel.Font.Color := clWindowText; 
end; 
+0

是否有可能降低其上,用鼠標定位時,描述的顏色發生變化的區域?如果我把鼠標指針放在遠離單詞的地方,但是在同一行中,顏色會發生變化。我希望只有當鼠標指針放在單詞上時纔會發生改變顏色。 (對不起,我的英語不好)。 –

+0

@NicoZ這可能是可能的。您必須使用具有'DT_CALCRECT'標誌的'DrawText' WinAPI來計算文本大小。即使那樣,它也不會100%。 –