Capturar Texto de un String luego de un espacio
 

Hola, tengo un arreglo de strings, que tienen dos palabras separadas por un espacio, y quiero capturar la segunda. Podran orientarme? graciaas

Usa la función Pos para encontrar la posición del espacio, y luego la función Copy para copiar la parte de la cadena a partir del espacio.

// Saludos

Para resolver tu problema se necesitan del uso de dos funciones: Copy y Pos. Mira este ejemplo:

Código Delphi [-]
segunda_palabra := Trim(Copy(TextoCompleto, Pos(' ', TextoCompleto), Length(TextoCompleto)));

Uso la función Trim para quitar cualquier espacio que pueda existir de más.

Por último, no me queda claro a que te refieres con el Arreglo de Strings.

Saludos,
Chris

claaro, pensaba en eso, pero no se cuantos espacios tengo en el string. con la funcion length puedo sacar la longitud de todo la cadena... podria de alguna forma restarle la posicion del espacio a la longitud total y saber cuantos caracteres quedan? :P graciaas

aah, buenisimo, graciaaas

Arreglo de strings: array[1..N] of strings;

Hola.

Código Delphi [-]
var
  i: Integer;
begin
  for i:= 1 to 10 do
    ListBox1.Items.Add(Copy(VStr[i],Pos(' ', VStr[i])+1, MaxInt));
  ...
end;

Saludos.

¿ Puede haber espacios antes del que separa ambas palabras ?

Saludos.

:p Obvio! entiendo lo que es Arreglo de Strings: Lo que no entendía, que papel jugaba mencionar esto en tu pregunta. Pero bueno, espero que hallas solucionado tu problema.

Saludos,
Chris

Me contesto solo :p:)

Código Delphi [-]
var
  i: Integer;
  s: string;
begin
  for i:= 1 to 10 do
  begin
    s:= TrimLeft(VStr[i]);
    ListBox1.Items.Add(Copy(s, Pos(' ',s)+1, MaxInt));
  end;
end;

Saludos.

[quote=ecfisa;404624]¿ Puede haber espacios antes del que separa ambas palabras ?

Saludos.[/QUOTE

no, hay un solo espacio

De esta manera quitas los posibles espacios que estén antes de la primera palabra y despues de la segunda

Código Delphi [-]
 for i:= 1 to n do
  begin
    s:= Trim(VStr[i]);
    ListBox1.Items.Add(Copy(s, Pos(' ',s)+1, MaxInt));
  end;

Saludos.

me podras pasar bien el codigo? la funcion copy no la habia usado antes... sirve aun sin saber cuantos elementos quedan en el string despues del espacio?
graciaaas

Hola.

El uso de la función Copy está explicado en la ayuda de delphi.
Aqui también vas a encontrar ayuda y ejemplos: Copy.
Aqui sobre la constante: MaxInt.

Saludos.

ah buenisimo! graciaas!!