Wie unterscheidet man Groß- von Kleinbuchstaben und...?

[Namenloser]

In Delphi gibt es eine sehr praktische Sache: Sets.

Delphi-Quellcode:

var
  character: char;
begin
  character := 'P'; // Irgendein Zeichen
  if character in ['a'..'z'] then
    ShowMessage('Kleinbuchstabe')
  else if character in ['A'..'Z'] then
    ShowMessage('Großbuchstabe')
  else if character in ['0'..'9'] then
    ShowMessage('Zahl')
  else
    ShowMessage('Sonderzeichen')
end;

In diesem Fall wäre allerdings das Case-Konstrukt noch eleganter:

Delphi-Quellcode:

var
  character: char;
begin
  character := 'P'; // Irgendein Zeichen
  case character of
    'a'..'z': ShowMessage('Kleinbuchstabe');
    'A'..'Z': ShowMessage('Großbuchstabe');
    '0'..'9': ShowMessage('Zahl');
    else      ShowMessage('Sonderzeichen');
  end;
end;