[Lazarus] checklistbox itemenabled

[Mattias Gaertner]

On Thu, 13 May 2010 11:42:40 +0200
Andrea Mauri <andrea.mauri.75 at gmail.com> wrote:

> I am trying to use ItemEnabled property of CheckListBox and I found some 
> problems using it.
> Put a TCheckListBox on a form and on Create put this code:
> 
> procedure TForm1.FormCreate(Sender: TObject);
> var
>    i: integer;
> begin
>    for i:= 0 to 49 do
>    begin
>      CheckListBox1.Items.Append(Format('%d item', [i + 1]));
>      if (i mod 2) = 0 then
>        CheckListBox1.ItemEnabled[i]:= False;
>    end;
> end;
> 
> CheckListbox does not appear as expected, all the items are enabled.

Fixed in svn revision 25352.


Mattias