¿como reemplazar cadena con una cadena en una cadena??

[JXJ]

Hola

Tengo este codigo delphi

    function RemplazaCad(StrSrc, StrDest, Str : string) : string;
   // RemplazaCad('hola','prueba','Esto es una prueba') = 'Esto es una hola'
   begin
       while   Pos(StrDest,Str) > 0 do
       begin
           Insert(StrSrc,Str,  Pos(StrDest,Str));
           Delete(Str,  Pos(StrDest,Str),Length(StrDest));
       end;
       RemplazaCad := Str;
   end;

y me que dedado trabado en como convertirlo a C o C++ para usarlo en C++ Builder XE 7

String __fastcall ReemplazaCad(String StrSrc, String StrDest, String Str)
{
 String result ;
 while ( Pos(StrDest, Str) > 0)
 {
//   Insert(StrSrc, Str, Pos(StrDest, Str));
//   Delete(Str, Pos(StrDest, Str), Length(StrDest))
 }
   result = Str;

    return result;
}

lo comentado me da errror por que son codigo delphi que c++ Builder XE7 no tiene implementadas.

Gracias. :D