Checkbox aktivieren bei bestimmten buchstaben in TEdit

[mkinzler]

Warum eine Schleife, wenn Du dann jede einzeln setzt?
Immerhin sind diese nach 26 Schleifendurchläufen dann auf jedenfall nicht mehr gescheckt.

Ich würde diese in einem Array verwalten und dann mit Schleife über den Index ansprechen.

Delphi-Quellcode:

for i := 0 to 25 do
  checkbox[i].Checked := Pos( chr(i+65), Uppercase(Edit2.Text)) > 0;