Verstehe die Zählschleifen und VCL-Komponenten nicht-Schule!

[Tormentor32]

Eine Messagebox ist eine Meldung, die in einem kleinem Fenster mit OK button ausgegeben wird.

Zu deinem Problem mit den Checkboxen:

Du solltest am Besten ein Array deklarieren, in welchem du deine Checkboxen speicherst, zum Beispiel

Delphi-Quellcode:

type TCheckBoxArray = Array[0..39] of TCheckbox // oder wieviele du brauchst

{ ... }

var
  CheckBoxArray: TCheckBoxArray; // Eine Variable deines Arrays

Jetzt kannst mit der oben genannten Forschleife jede Checkbox erstellen und werte zuweisen

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var i: integer;
begin
  for i := 0 to 39 do // oder deine Anzahl
    begin // hier ist die Verbundanweisung nötig, da du ja Mehrere Anweisungen innnerhalb der Schleife Machen willst
      CheckBoxArray[i] := TCheckbox.Create(Form1);
      CheckBoxArray[i].Parent := Form1;
      CheckboxArray[i].Height := WasAuchImmer;
      CheckBoxArray[i].Width := WasAuchImmer2;
      CheckboxArray[i].Top := i*(WasAuchImmer+1); // Dann sind alle Checkboxen untereinander
    end;
end;

Aber Vergiss nicht, die Checkboxen hinterher wider freizugeben mit

Delphi-Quellcode:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var i: integer;
begin
  For i := 0 to 39 do // oder deine Anzahl
    CheckBoxArray[i].free;
end;

Ich hoffe, das hilft