case Key of ... Großbuchstaben

[Reinhard Kern]

Hallo

optimal, optimaler, am optimalsten ?:

Delphi-Quellcode:

      case Key of
        222            :    Memo.Text := Memo.Text + Chr(39);
        else                Memo.Text := Memo.Text + chr(Key);
        end;

Gruss Reinhard