Eigentlich ganz einfach. Ein String ist ein 1-basiertes Array von Character-Zeichen.
Delphi-Quellcode:
case strDummy[1] of
'0'..'9': ...
'A'..'Z': ...
'a'..'z': ...
....
end;
Du musst nur sicherstellen, dass mind. ein Zeichen vorhanden ist, ansonsten gibt es eine "Index out of Bounds"
Exception 
...
...