Einzelnen Beitrag anzeigen

Satty67

Registriert seit: 24. Feb 2007
Ort: Baden
1.566 Beiträge
 
Delphi 2007 Professional
 
#12

Re: Schleife um farbliche Darstellung im VST anzupassen

  Alt 19. Mai 2009, 20:40
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.
  Mit Zitat antworten Zitat