dann interpretiert Delphi z.B Case of 20 als Case of 20 und Case of 2, d.h. es werden zuerst die Daten von case of 20 und darunter die Daten von case of 2 eingetragen
Man hätte natürlich einfach mal mit dem Debugger nachsehn können, ob Delphi das wirklich macht.
Wurde dir nicht schonmal gesagt, daß man
if ... = False then
einfach nicht mache?
Und die Fehlermeldung
ShowMessage('Fehler. Formular oder Formularfeld nicht gefunden')
ist auch geil, denn die sagt absolut nichts, vorallem nicht das Wichtigste, also was nicht gefunden wurde.
Und Natürlich fällt keinem auf, daß hier Code tausendmal kopiert wurde?
Im Prinzip passt alles, also das ganze Case, in eine Funktion, welche nur noch zwei Parameter braucht (also F1W und F1N)
Oder man schreibt eine Funktion, welche für einen Integer den passenden String, des gewünschten Edits zurückgibt und die vielen Case sind plötzlich nutzlos.
Oder ...