| A simple checklistbox1.enabled := false wouldnt do it. Try this code : procedure TForm1.CheckListBox1ItemClick(Sender: TObject; Index: integer); begin checklistbox1.Checked[index] := not checklistbox1.Checked[index] ; end; -- Auf meiner Homepage www.Corpsman.de ist immer was los, ständig wird sie aktualisiert und erweitert. Da ist für jeden was dabei.
|
-- _______________________________________________ Lazarus mailing list Lazarus@lists.lazarus.freepascal.org http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
