Показать сообщение отдельно
  #3  
Старый 01.12.2010, 15:56
windrunner windrunner вне форума
Прохожий
 
Регистрация: 30.11.2010
Сообщения: 6
Репутация: 10
По умолчанию

Цитата:
Сообщение от ЖабаДушитКота
Код:
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;

Точно. Спасиб! От вырезанного текста у меня позиция искалась. А у тебя от суммы. Ты прирожденный математик
Ответить с цитированием