buscar y resaltar palabras en un trxrichedit

[Romanosky]

Hola, buenas!!

En la aplicación que estoy realizando crear el contenido de un trxrichedit de forma dinamica a partir de unos datos guardados en unos tstringlist. La cuestion es la siguiente:

- a medida que voy añadiendo linias del tstringlist al trxrichedit he de resaltar con otro color o con atributos una serie de palabras o datos, esto lo he conseguido mediante el findtext una vez he añadido las linias al componente. Es decir hago el findtext, selecciono la palabra y cambio atributos y colores

- El problema es que este siempre me localiza la posicion de la primera palabra que encuentra en el trxrichedit, que debo hacer para buscar las siguientes palabras si la que he de resaltar se repite mas de una vez en el texto?

gracias

[Neftali [Germán.Estévez]]

Empezado por Romanosky

El problema es que este siempre me localiza la posicion de la primera palabra que encuentra en el trxrichedit, que debo hacer para buscar las siguientes palabras si la que he de resaltar se repite mas de una vez en el texto?

Vuelve a utilizar FindText modificando la posición inicial de búsqueda, que es el segundo parámetro de la llamada.

[Nuria]

Hola Romanosky!

Lo mismo hay otra manera más adecuada de hacerlo, pero yo no la he encontrado. Puedes hacer lo siguiente:

Código Delphi [-]
 longitud := Length(RxRichEdit.Text);
 posi := RxRichEdit.FindText(textoabuscar,1,longi,[stSetSelection]);
 while posi >= 0 do begin
     //
    // Haces lo que tengas que hacer
    //

    // Busca la siguiente palabra.
    posi := RxRichEdit.FindText(Textoabuscar,posi,longi,[stSetSelection]);
 end;

Espero que te sirva... Saludos!

[Romanosky]

Gracias por vuestra colaboración,

deberia haberme dado cuenta antes de que tenia el parametro de inicio de la busqueda en el findtext, ya sabies No corras que tengo prisa.