[AlexandrV]

Почему такие баги может ктонибудь ответит но баги 100% не из за этого

Код:

if odSelected in State then begin
    CheckListBox4.Canvas.Brush.Color:=RGB(255,119,227);
    CheckListBox4.Canvas.Font.Color:=ClBlue;
  end
  ELSE begin
    CheckListBox4.Canvas.Brush.Color:=CheckListBox4.Color;
    CheckListBox4.Canvas.Font.Color:=clPurple;
  end;

Если это убрать все равно остается