[aguml]

Hola amigos, estoy probando a ver si consigo que esta funcion funcione correctamente. Ya lo hace pero no me convence ya que uso algo de trampa para que funcione jejeje.
Lo que quiero es que cree una cadena de caracteres usando un rango y que vaya avanzando hasta crear todas las combinaciones posibles y que vaya comparando con otra cadena para ver si son iguales. Esto es lo que tengo hecho:

Código PHP:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   AnsiString Rango = "0123456789ABCDEF©"; //El ultimo caracter no sirve y es simplemente un caracter de control para saber cuando se llega al final e incrementar
   AnsiString cadena = "FAAF"; //Cadena hexa a buscar. No puede ser mayor que "FFFFFFFF"
   AnsiString Salida;
   bool retval;
   bool error=false; //bandera para la verificacion de la cadena
   double tiempoInicial, tiempoFinal;

   //Podemos asegurarnos de que el valor de cadena es hexa antes de seguir para evitar problemas
   for(int i = 1; i<=cadena.Length() && error != true; i++)
   {
      if( (cadena[i] < '0' || cadena[i] > '9') &&
          (cadena[i] < 'A' || cadena[i] > 'F') &&
          (cadena[i] < 'a' || cadena[i] > 'f') )
      {
         ShowMessage(AnsiString().sprintf("La cadena %s no es hexadecimal", cadena));
         error = true;
      }
   }

   //Tambien deberiamos asegurarnos de que el largo de la cadena no exceda del maximo
   if(cadena.Length() > 8)
   {
      ShowMessage(AnsiString().sprintf("El largo de cadena excede del largo máximo.\nLargo actual: %d\nLargo máximo permitido: %d", cadena.Length(),8));
      error = true;
   }

   if(error != true) //Si no se produjo ningun error seguimos adelante
   {
      Form1->WindowState = wsMinimized; //Minimizamos el form para que el usuario no pueda pulsar el boton ni nada

      tiempoInicial = GetTickCount(); //Obtenemos el tiempo de entrada

      retval = FuerzaBruta(cadena, &Salida, Rango);

      if(retval == false){ //Si no se encontró avisamos
         ShowMessage("No se encontró el valor");
      }else{
         tiempoFinal = GetTickCount(); //obtenemos el tiempo de salida

         ShowMessage( AnsiString().sprintf( "Valor hexadecimal: %s\n"
                                            "Se han tardado %s segundos en encontrarlo.",
                                            Salida, FormatFloat("0.000",(tiempoFinal - tiempoInicial) /1000)));
      }
      Form1->WindowState = wsNormal; //volvemos a restaurar el form
   }
}
//---------------------------------------------------------------------------

bool FuerzaBruta(AnsiString Serial, AnsiString *Salida, AnsiString Rango)
{
   int x, pos = 1;
   AnsiString Mascara = "";
   char valorInicial, valorFinal; //Es el valor inicial y final de caracter a buscar
   bool fin = false, sig = false, retval = false;

   //Asignamos el rango de busqueda
   valorInicial = Rango[1];
   valorFinal = Rango[Rango.Length()];

   //Rellenamos la mascara a usar para dar formato
   for(int z=1; z <= Serial.Length(); z++)
      Mascara += valorInicial;

   //Pongo x con el largo de la cadena de la mascara ya que esta será la que recorra toda la mascara y empieza desde el ultimo caracter
   x = Mascara.Length();

   //Bucle de fuerza bruta
   do{
      //Si obtuvimos un serial bueno
      if(Mascara == Serial)
      {
         *Salida = Mascara; //Guardamos el serial en el buffer de salida
         retval = true; //Indicamos que encontramos la cadena
         fin = true; //Indicamos que debemos salir ya
      }else{

         //Incrementamos el caracter
         Mascara[x] = Rango[++pos];

         //Mientras que el valor del caracter sea igual que el valor del caracter usado como tope...
         while(Mascara[x] == valorFinal && fin != true)
         {
            //Si no es el primer caracter
            if(x != 1)
            {
               //Inicializamos el caracter con el primer valor válido
               Mascara[x] = valorInicial;

               //Retrocedemos una posicion en la cadena
               x--;

               pos = Rango.Pos(Mascara[x]); //Buscamos la posicion del caracter en el rango
               Mascara[x] = Rango[pos+1]; //Incrementamos el valor del caracter
               sig=true; //Indicamos que se ha reajustado la cadena porque llegamos al final en un caracter
            }
            else
            {
               //Y si llegamos al valor máximo en el primer carácter
               //Forzamos la salida del procedimiento
               fin = true;
            }
         }

         //Si algun caracter llegó hasta el final y se tuvo que reajustar todo...
         if(sig==true)
         {
            x=Mascara.Length(); //volvemos a colocar el indice al final de la cadena
            sig=false; //Volvemos a poner a false el flag que nos indica que se llego al final en un caracter
            pos=1; //Colocamos el indice del rango apuntando al primer caracter del rango
         }
      }
   }while(fin == false);

   return retval;
}
//--------------------------------------------------------------------------- 


El tema es que para hacer que funcione tengo que poner un caracter mas en el rango, el cual uso para saber si llego al final del rango valido o no y me gustaria no tener que usar un caracter mas, simplemente los que yo quiera que use para la generacion. No se si me explico bien.
¿podeis ayudarme?
Gracias por adelantado.