Einzelnen Beitrag anzeigen

Keldorn

Registriert seit: 6. Mär 2003
Ort: Meißen
876 Beiträge
 
Delphi 10.1 Berlin Professional
 
#7

Re: Check List Box einfärben

  Alt 7. Jul 2004, 21:56
Delphi-Quellcode:
    if (cblb_statusinfo.Checked[Index]) then
    begin
      Hintergrund zeichnen
      text zeichnen
    end
    else
    begin
      text zeichnen
    end;
fällt dir was auf? im else zweig zeichnest du nur den text.
da fehlt das setzen der Hintergrundfarbe und das fillrect. mit dem state kannst du rausbekommen, ob der eintrag selektiert ist oder nicht, und entsprechend die farbe auf clwindow (nix selektiert) oder clhighlight (selektiert) setzen.

Mfg Frank

Lükes Grundlage der Programmierung:
Es wird nicht funktionieren
(Murphy)
  Mit Zitat antworten Zitat