Irgendwie sehe ich momentan das Problem nicht, allerdings habe ich noch nie in CheckListBox OnDrawItem genutzt
Delphi-Quellcode:
procedure TForm1.CheckListBoxDrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
begin
with (Control as TCheckListBox) do
begin
if odSelected in State then
In der letzten Zeile kommt die Fehlermeldung
Code:
[Fehler] uMain.pas(115): '[' erwartet, aber 'THEN' gefunden