Работа со строками. Delphi

[сер4ей]

а как в одном Edite, взять вырезать часть строки до длинного слова и после длинного слова и вставить обратно: до длинного слова+самое короткое слово+после самого длинного слова

[Лунатик222]

Сообщение от сер4ей

а как в одном Edite, взять вырезать часть строки до длинного слова и после длинного слова и вставить обратно: до длинного слова+самое короткое слово+после самого длинного слова

занеси текст из Edit в переменную типа String и

i:=1;
   while a[i]<>'  ' do
    begin
     inc(i);
     inc(j);
    end;

j будет количество символов слова до пробела, дальше сам разберешься?