texto en un MEMO ...encontrar comparar

[sakuragi]

hola que tal

estoy batallando para como hagarrar el texto del memo y separarlos por palabrar para despues compararlas ( esto se llama token) sera conmparadas con unas palabras que estan en un listbox

seria asi?

itemindex.memo1.text:= token //seria la asignacion?

if token= copy ( list.text,4,lon -3) // seria la comparacion lon seria la longitud

que tan lo sierto estoy?

o que tan mal estoy? :confused:

cual quier sujerencia ayuda o comentario se los agradeseria

de hante mano gracias (:

[jachguate]

La verdad no he entendido tu pregunta. Podrias tratar de explicarlo de nuevo?

además...

itemindex.memo1.text

A que clase pertenece itemindex???

[roman]

estoy batallando para como hagarrar el texto del memo y separarlos por palabrar para despues compararlas ( esto se llama token) sera conmparadas con unas palabras que estan en un listbox

Te recomiendo que leas este hilo (http://www.clubdelphi.com/foros/showthread.php?t=4996&highlight=TParser), creo que te dará buenas ideas.

// Saludos

[sakuragi]

gracias por la ayuda

bueno el problema real seria asi

tengo en un memo que se llama memo1 escrito los siguiente:

por ejemplo

program ejemplo;
uses crt;


quiero ese texto escrito en un memo se pararlos por palabras para compararlas con otras que tengo ya almacenadas en un ListBox

seria hagarrar "program" y conpararlas en el listbox, "ejemplo" y compararlo y tambien el ";" (punto y coma) conpararlo en el list

tengo en tendido que ha esto se le llaman token lo que seria program , ejemplo, (punto y coma) seria un token.


de hante mano gracias (:

[roman]

¿Realmente leíste el hilo que te recomendé y los enlaces que ahí se mencionan?

Luego de releer el hilo no tuve dificultad para instanciar un parser, escribir un ciclo para leer los tokens y separarlos en una lista:

program
ejemplo
;
uses
crt
;

No más de 20 líneas de código.

// Saludos