Umkehrung von if-Schleifen

[Nicolai1234]

Ich habe einen Block aus 64 if-Abfragen:

Code:

if s = 'A' then result := '1001010';
if s = 'a' then result := blabla1;
if s = 'B' then result := blabla2;
if s = 'b' then result := blabla3;
if s = 'C' then result := blabla4;
if s = 'c' then result := blabla5;
if s = 'D' then result := blabla6;
if s = 'd' then result := blabla7;
if s = 'E' then result := blabla8;
...

Nun möchte ich die ganze Sache auch umgekehrt haben. Also:

Code:

if s = 'A' then result := '1001010';
if s = blabla1 then result := 'A';
if s = blabla2 then result := 'a';
...

Gibt es da eine Möglichkeit, dass ich nicht alles neu schreiben muss. Eine umgekehrte if-Schleife sozusagen?