Consulta en Tabla

[*Caro*]

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; //nuestro delimitador sera el espacio
  sl.DelimitedText := Edit1.Text;
 
  for i:=0 to sl.Count-1 do
   showmessage('La palabra es: '+sl[i]);
 
  sl.Free;
end;

Saluditos