String in char zerlegen

[Mavarik]

Delphi-Quellcode:

var
  ch : Char;
  i  : Integer;
  S  : shortstring; // oder auch String...
begin
  for i:=1 to length(S) do
    begin
      ch := S[i];
//      ... Do something
    end;
end.

Sowas?

Frank