Cita:
Empezado por Abuelo7
Ahora necesitaría vuestra ayuda para lo siguiente:
Al introducir una frase o cadena de texto en un Edit que pueda separar la cadena por palabras, asignando cada palabra a una variable, para poder trabajar despues con cada una.
|
Hola Manuel, para separar tu cadena en palabras puedes utilizar un stringList y utilizar sus funciones Delimiter y DelimiterText, has esta pruebita y tu ves como lo acomodas a tu codigo.
Código Delphi
[-]
var
sl : TStringList;
begin
sl := TStringList.Create;
sl.Delimiter := #32; sl.DelimitedText := Edit1.Text;
for i:=0 to sl.Count-1 do
showmessage('La palabra es: '+sl[i]);
sl.Free;
end;
Saluditos