Цитата:
Сообщение от ЖабаДушитКота
Код:
var
mytext: string;
begin
mytext:=copy(RichEdit1.Text, k+1 ,Length(RichEdit1.Text)-k);
If pos(Edit1.Text, mytext)<>0 then
k:=k+pos(Edit1.text, Mytext)
else
k:=Pos(Edit1.Text, RichEdit1.Text);
RichEdit1.SelStart:=k-1;
RichEdit1.Perform(EM_SCROLLCARET,0,0);
RichEdit1.SetFocus;
end;
|
Точно. Спасиб! От вырезанного текста у меня позиция искалась. А у тебя от суммы. Ты прирожденный математик