Foros Club Delphi - Recorrer un string

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - Recorrer un string (https://www.clubdelphi.com/foros/showthread.php?t=26981)

davidgaldo

09-11-2005 08:43:41

Recorrer un string

Hola como puedo recorrer un string para saber que caracteres tiene en cada posición, gracias a todos de antemano.

Casimiro Noteví

09-11-2005 09:14:08

Código Delphi [-]procedure TForm1.Button1Click(Sender: TObject);
 var
     iX : integer;
     cTexto : string;
 begin
     cTexto := 'ABCDEFGHIJK';
     for iX:=1 to Length(cTexto) do
         ShowMessage(cTexto[iX]);
 end;

FunBit

09-11-2005 09:16:33

Puedes acer un bucle usando las funciones Copy,Length.

Código Delphi [-] var
  Cadena,caracter: String;
 
 for i:=0 to i=Length(Cadena) do 
 begin
    caracter:=Copy(Cadena,i,1);
    //Control de cada caracter de la cadena
 end;

En cada iteración del bucle te quedara en la variable caracter el caracter de la posicion "i" de la cadena.

Espero que te pueda ayudar!!

Saludos!

davidgaldo

09-11-2005 10:04:28

Gracias, me funcionó a la primera.

La franja horaria es GMT +2. Ahora son las 00:36:43.