String durchsuchen?

[mo_greene]

Okay vielen Dank!

Ich habe es jetzt so gelöst:

Delphi-Quellcode:

  for i := 0 to n do
  begin
    zahlen := '';
    zeichen := '';
    for j := 1 to Length(String[i]) do
    begin
      if String[i] = '' then
      exit;
      if String[i][j] in ['0'..'9'] then
        zahlen := zahlen + String[i][j];
      if String[i][j] in ['A'..'Z'] then
        zeichen:= zeichen+ String[i][j];
      if String[i][j] in ['a'..'z'] then
        zeichen:= zeichen+ String[i][j];
    end;