Fehler: Inkompatible Typen - 'Char' und 'String'?

[mo_greene]

Hallo,

habe gerade ein Problem und irgendwie ein Brett vorm Kopf - finde keine Lösung:

Delphi-Quellcode:

function TForm1.wert(zeichenkette : string) : Integer;
var
  i, zaehler : Integer;
begin
  for i := 1 to Length(zeichenkette) do
  begin
    case zeichenkette[i] of
    'A..Z' : zaehler := zaehler + 1;
    'a..z' : zaehler := zaehler + 1;
    '0..9' : zaehler := zaehler + 2;
    end;
  end;

  result := zaehler;
    
end;

Da spuckt Delphi doch glatt die Fehlermeldung aus:

Zitat:

[Pascal Fehler] uView.pas(68): E2010 Inkompatible Typen: 'Char' und 'string'

Woran liegts?

Danke!