Checkbox

[Nuclear-Ping]

Delphi-Quellcode:

// Absichtlich dynamisches Array
var
  myCheckboxes: Array of TCheckbox;
  a: Integer;
begin
  SetLength (myCheckboxes, 30);
  for a := 0 to Length (myCheckboxes) - 1 do
    begin
      myCheckboxes[a] := TCheckbox.Create (Self);
      with myCheckboxes[a] do
        begin
          Parent := Self;
          Name := 'Checkbox' + inttostr (a + 1);
          Caption := 'Checkbox ' + inttostr (a + 1);
          Width := 100;
          Left := 8; // ggf anpassen falls du Spalten machen willst
          Top := (a + 1) * 8;
        end;
    end;  

end;

Sollte klappen. Nicht vergessen, die dann auch wieder freizugeben wenn du sie nicht mehr brauchst (Programmende).