#ifndef seakgReplaceInTextH
#define seakgReplaceInTextH
//-----------------------------------------------------------------------------------------
#include <vcl.h>
#include <vector.h>
//-----------------------------------------------------------------------------------------
struct replInOut {   AnsiString in;   AnsiString out;};
//-----------------------------------------------------------------------------------------
typedef void (*nowState)(int progress);
class seakgReplaceInText
{   public:   seakgReplaceInText() {};
   void setListReplaces(AnsiString list);
   AnsiString Replace(AnsiString text, bool registr, nowState event);
   private:   void addNewReplace(AnsiString in, AnsiString out);
   void addRasparsStringAndAdd(AnsiString str);
   vector <replInOut> listReplaces;
   nowState ff;};
//-----------------------------------------------------------------------------------------
void seakgReplaceInText::addNewReplace(AnsiString in, AnsiString out)
{   if(in.Length() == 0) return;
   replInOut new_replace;
   new_replace.in = in;
   new_replace.out = out;
   listReplaces.push_back(new_replace);};
//-----------------------------------------------------------------------------------------
void seakgReplaceInText::addRasparsStringAndAdd(AnsiString str)
{  AnsiString kov = "\"";
   if((str.Pos("=")==0) || (str.Pos(";")==0) || (str.Pos(kov)==0)) return;
   AnsiString out = str;
   AnsiString in = out.SubString(1, out.Pos("=") - 1);
   out.Delete(1, out.Pos("=") );
   out = out.SubString(1, out.Pos(";") - 1 ); //оставляем строчку до ;
   in.Delete(1, in.Pos(kov));
   out.Delete(1, out.Pos(kov) );
   for(int i = in.Length(); i > 0; i--)
   {   if( in[i] == kov[1] )
   {   in = in.SubString(1, i - 1);  break; };
   };
   for(int i = out.Length(); i > 0; i--)
   {   if( out[i] == kov[1] )
   {   out = out.SubString(1, i - 1);
   break;   };
   };
   addNewReplace(in, out);};
//-----------------------------------------------------------------------------------------
void seakgReplaceInText::setListReplaces(AnsiString list)
{   listReplaces.clear();
   AnsiString str = list;
   while( str.Pos(";") > 0)
   {  AnsiString str1 = str.SubString(1, str.Pos(";"));
   str.Delete(1, str.Pos(";"));
   addRasparsStringAndAdd(str1);
   };};
//-----------------------------------------------------------------------------------------
AnsiString seakgReplaceInText::Replace(AnsiString text, bool registr, nowState event)
{   int length = text.Length();
   AnsiString result;
   while ( text.Length() != 0 )
   {  bool b = false;
   for(unsigned int i = 0; i < listReplaces.size(); i++ )
   {   int len = listReplaces[i].in.Length();
   if( registr == true )
   { if ( text.SubString( 1, len ) == listReplaces[i].in )
   {  text.Delete(1, len );
   result = result + listReplaces[i].out;
   b = true;
   break;  };
   }
   else
   {  if ( text.SubString( 1, len ).UpperCase() ==

   listReplaces[i].in.UpperCase() )
   {  text.Delete(1, len );
   result = result + listReplaces[i].out;
   b = true;
   break;   };
   };
   };
   if( b == false)
   {   result = result + text.SubString( 1, 1 );
   text.Delete(1, 1 );   };
   event(length - text.Length());
   };
   return result;
};
#endif

Рекомендую Вам также почитать: