Entweder mit exit arbeiten oder rückwärts anfangen...
Wieso? Muss man doch in Delphi gar nicht. Es wird doch nur der Fall angesprungen, der auch wirklich vorliegt und keine weiteren danach.
PS: Es gibt auch [delphi]-Tags
Danke für den [delphi]-Hinweis, gleich editiert. Das rückwärts war auf die ursprüngliche Variante mit den if-defs bezogen.
Gruß