Case verlangt einen Ordinalen Typen!
Delphi-Quellcode:
case Ord(Buchstabe) of {hier Asciiwert des Zeichens zurückgeben lassen}
111..123: bla bla; {hier prüfen, ob asciiwert in einem bestimmten Bereich steht(Sonderzeichen, Großbuchstaben, etc) ...siehe AsciiTabelle}
end;
bzw. hier ein einfaches Beispiel :
Delphi-Quellcode:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
case ord(key) of
100..200: showmessage('ein Zeichen aus 100 bis 200 gedrückt....');
32: showmessage('Leertaste gedrückt');
end;
end;