example;
mail to ME.
I have to uses RichViewEdit.InsertText('<b>mail</b> to <b>ME</b>.', False);
Code: Select all
for i := 0 to SL_1.Count - 1 do
begin
SRE_Duzenleme.RichViewEdit.SelectAll;
while SRE_Duzenleme.RichViewEdit.SearchText(SL_1.Strings[i], [rvseoMatchCase]) do
begin
SRE_Duzenleme.RichViewEdit.InsertText(SL_2.Strings[i], False);
end;
SRE_Duzenleme.RichViewEdit.Format;
end;
Nadir.