[NIch]

Я бы немножко подправил

Код:

case Key of
 'a' : ...
 'b' : ...
 ...
end;

Т.е. использовать не if...then, а case ... of...
ИМХО