Fórum Exibir parte de uma string #269475

var
  S: string;
  N: Integer;
  S1: string;
  S2: string;
begin
  S := ´Ibirapuera/São Paulo´;

  N := Pos(´/´, S);
  if N > 0 then begin
    S1 := Copy(S, 1, N - 1);
    S2 := Copy(S, N + 1, Length(S) - N);
    // S1 = ´Ibirapuera´
    // S2 = ´São Paulo´
  end
  else begin
    // não tem ´/´... é um erro?
  end;
...