Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hobbycoder,
29. Nov 2018
Gültig schon. Hat auch eine vorhersehbaren Wert. Nur eben entspricht dieser Max-Scheifendurchläufe+1 und passt somit auch nicht mehr zu den Items.
Hier mangelt es an den Grundlagen. Tutorials, die es im Netz zu Hauf gibt, sollten helfen. Bevor die Grundlagen nicht vorhanden sind, bringt das alles nichts. Sorry.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hobbycoder,
28. Nov 2018
Du schreibst:
procedure TEquipment.Button1_prüfenClick(Sender: TObject);
begin
n := 0;
for i := 0 to CheckListBox1.Items.Count - 1 do
begin
if CheckListBox1.Checked then inc(n);
end;
Label2_Überprüfung.Caption := Label2_Überprüfung.Caption + sLineBreak + CheckListBox1.Items;