Checkboxen machen mich wahnsinnig!

[KrasserChecker]

Zitat von Neutral General:

Hab grade versucht das Problem zu lösen aber genau wie du sagst ist das Problem das sobald man Checked ändert wird die OnClick Procedure ausgeführt -.-^^

Stimmt, daher müsste es doch auch eigentlich reichen, wenn Du die erste Schleife umdrehst.

Also statt

Delphi-Quellcode:

...
if VeloLayers = (Sender as TCheckBox).Tag then
    begin
        For i:=1 to VeloLayers-1 do
        begin
           BoxToCheck[i].Enabled := True;
           BoxToCheck[i].Checked := False;
        end
    end 
...

einfach

Delphi-Quellcode:

...
if VeloLayers = (Sender as TCheckBox).Tag then
    begin
        For i:=VeloLayers-1 downto 1 do
        begin
           BoxToCheck[i].Enabled := True;
           BoxToCheck[i].Checked := False;
        end
    end 
...