StringReplace testando palavra inteira. É possível?

Caros amigos,
Ontem postei esta dúvida mas acho que não fui muito claro. A questão é o seguinte:

O que o Delphi faz:

S := StringReplace(´O Delphi e muito legal´, ´e´, ´X´, [rfReplaceAll, rfIgnoreCase]);
// resultado = ´O DXlphi X muito lXgal´

O que eu quero fazer:

S := TrocaPalavra(´O Delphi e muito legal´, ´e´, ´X´, [rfReplaceAll, rfIgnoreCase, rfPalavraInteira]);
// resultado = ´O Delphi X muito legal´

Se alguém quiser me dar uma mão, agradeço.

Um abraço. 8)