Schleife um farbliche Darstellung im VST anzupassen

[Satty67]

Also gefallen muss Dir Dein Code, wobei es ja eine kommerzielle Anwendung wird, weshalb etwas höhere Ansprüche gestellt werden müssen.

Was mich persönlich stört, sind halt diese Konstrukte:

Delphi-Quellcode:

AnsichtForm.FindComponent('CheckBox' + IntToStr(iCheckBox)) as TCheckBox).Checked
// bzw.
Pos((AnsichtForm.FindComponent('Edit' + IntToStr(iEdit1))as TEdit).Text,DatenMB.Teilnehmer)

Das könnte man elegant auslagern und sogar Code sparen. Die ganze Routine wird dadurch (zumindest für mich) erheblich übersichtlicher. Dann sieht man sicher auch was noch geht. Der Code im Case Block 0 und 1 lässt sich danach sicher auch nochmal zusammenfassen.