Eine Möglichkeit, auf mehrere Buchstaben zu prüfen wäre folgende (geht aber nur für Char, d.h. einzelne Zeichen):
Delphi-Quellcode:
var buchstabe: Char;
...
buchstabe:= 'W';
...
if (buchstabe in ['A'..'Z']) then begin
ShowMessage('Groß');
....
end
else begin
ShowMessage('Klein oder kein Buchstabe');
...
end;
MfG
Binärbaum