Регулярные выражения. Builder6.

char *pattern = "^aaa.*aaa$";
       char *str = "aaajshfsdoiuaadfhdjaaa";
       pcre *re;
       int options = 0; //PCRE_ANCHORED;
       const char *error;
       int erroffset;
       re = pcre_compile (pattern, options, &error, &erroffset, NULL);
       if(!re)
       {
            Edit2->Text = "failed";
       }
       else
       {
             int count = 0;
             int ovector[30];
             count = pcre_exec  (re,  NULL, (char *)str, strlen(str), 0, ovector, 30);
             if (!count)
             {
                 Edit2->Text =  "bad";
             }
             else
             {
               Edit2->Text =  count;
               for (int c = 0; c < 2 * count; c += 2)
               {
                 if(ovector[c] < 0)
                 {
                    Memo1->Lines->Append("fuck");
                 }
                 else
                 {
                    Memo1->Lines->Append(ovector[c]);
                    Memo1->Lines->Append("/");
                    Memo1->Lines->Append(ovector[c+1]);
                 }
              }
            }
        }