Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Check List Box einfärben

    Delphi
    by shmia, 7. Jul 2004
  if (cblb_statusinfo.Checked) then
  begin
  cblb_statusinfo.Canvas.Brush.Color := clRed;
  cblb_statusinfo.Canvas.FillRect(Rect);
  cblb_statusinfo.Canvas.TextOut(Rect.Left, Rect.Top, cblb_statusinfo.Items);
  end
  else
  begin
  // Farbe der nicht gecheckten Items
  cblb_statusinfo.Canvas.Brush.Color := cblb_statusinfo.Color; //...