[Lazarus-es] buscar texto en TRichMemo

Rafael Bidegain r.bidegain en gmail.com
Sab Mayo 13 04:14:16 CEST 2017


Hola a todos.

Estoy haciendo unas pruebas con TRichMemo.
encontré el componente en http://wiki.freepascal.org/RichMemo.

necesito buscar un texto y posteriormente reemplazarlo
pero en la búsqueda ya tengo inconvenientes, el procedimiento es el siguiente.

procedure TForm1.Button1Click(Sender: TObject);
var
   i : integer;
begin
  i := RichMemo1.Search(Edit1.Text, 0, length(Edit1.Text), soWholeWord);
  ShowMessage(IntToStr(i));
end;

el error está en soWholeWord y es el siguiente:

unit1.pas(67,71) Error: Incompatible type for arg no. 4: Got
"TSearchOption", expected "TSearchOptions"

será un error en el código del componente?
-- 
Rafael Bidegain

Ya que los cuerdos no hablan, hablará el loco.
(The Fool, Padraic Pearse)

# yo quiero educación libre. ¡YA!


Más información sobre la lista de distribución Lazarus-es