Funcao acrescentar 1 em uma string? (exemplo: A 1 = B)

Question

Algu�m conhece uma fun��o no Delphi que de para eu somar +1 em uma string? por exemplo:A + 1 = B;B + 1 = C;C + 1 = D;...

Xanatos · Answer

Essa � do meu tempo de facul...nao sei se � isso que voce quer mas ai vai:

var
  i: integer;
  c: char;
begin
 c:= Edit1.Text[1];
 i:= ord(c)+1;
 Edit2.Text:= CHR(I);
end;

Massuda · Answer

Desculpe se n�o entendi sua d�vida, mas para cada char da string voc� pode fazer:

var
  S: string;
  I: integer;
...
  S[I] := Succ(S[I]);

  // ou ainda...

  S[I] := Chr(Ord(S[I]) + 1);

N�o testei, talvez haja problema quando S[I] = 255.

Weber · Answer

Beleza, vlw  :lol:...

F�rum Funcao acrescentar 1 em uma string? (exemplo: A 1 = B) #271268