[m1sclick]

Что касается:

Код:

Memo1.Lines.Add(fel.Text);

Совершенно не понял что ты написал, если убрать ту строчку в конце содержимое твоего файла не покажется в memo и все, я её написал ради теста не больше.
Вот код с комментариями:

Код:

  fel:= TStringList.Create;   // Создаю StringList
  fel.LoadFromFile('index.html'); // Загружаю файл
  i:= pos('</body>', fel.Text); // Ищу позицию закрывающего тэга Body
  code:= fel.Text; // Присваиваю переменной содержимое файла
  Insert(Memo1.Lines.Text+#13#10, code, i); // Дописываю в файл данные с Memo
  fel.Text:=code; // Записываю в файл уже измененный текст
  Memo1.Lines.Add(fel.Text); // Вывожу м Мемо содержимое файла
  fel.SaveToFile('index.html'); // Сохраняю файл
  fel.Clear;  // Освобождаю память

Про заменить прошу подробнее. Что именно заменить, где?

И меня до сих пор интересует - как эта программа упрощает жизнь веб программистам?