Das Problem ist das laut Screenshot in dem Editfeld "Edit1" steht. Das Editfeld müsste mit "0" vorbelegt werden oder du nimmst die Lösung:
Delphi-Quellcode:
procedure TForm1.CheckBox1Click(Sender: TObject);
var LKurse: Integer;
begin
LKurse := 0;
if Checkbox1.Checked then inc(LKurse);
if Checkbox2.Checked then inc(LKurse);
Edit1.Text := inttostr(LKurse);
end;