Recuperar posição de um caracter em um edit

Delphi

04/06/2003

Como faço, para recuperar posição de um caracter em um edit ?
ex: No edit esta escrito ´Maria´, quero chamar a 3ª posição, que
no caso retornaria ´R´.

Grato
Juarez


Juarezber

Juarezber

Curtidas 0

Respostas

Fred

Fred

04/06/2003

var p : integer;
s : string;
edit1.text := ´maria´;
s := edit1.text;
p := pos(´R´,s)//p pega a posição do r


GOSTEI 0
Fred

Fred

04/06/2003

a esqueci. depois para acessar a posição basta fazer o seguinte;

edit2.text := s[p];


GOSTEI 0
Dedi

Dedi

04/06/2003

Fred, acho que o que o Juarezber precisa é de uma constante que sempre retorne o terceiro caracter seria assim então;


edit1.text:=copy(edit1.text,3,1);




Dedi



GOSTEI 0
Juarezber

Juarezber

04/06/2003

Muito obrigado, para Ded e Fred
juarezber@terra.com.br


GOSTEI 0
POSTAR