Нужна помощь с TRegExpr в Builder

Суть в следующем, нужна регулярка для этого компонента которая получала бы со страницы все емейлы. текст в формате utf-8. Смотрел и на regexlib и вместе с этим компонентом от автора есть еще тестирующая программа для регулярок брал от туда пример, в его проге для тестирования все работает, но стоит перенести его регулярку в свой проект как тут же выдает ошибку Invalid[] Range Pos.

Вот пример.

Code:

String data; html->LoadFromFile("response.html");
data=html->Text; TRegExpr* exp= new TRegExpr;
exp->Expression="[_a-zA-Z\d\-\.]+@[_a-zA-Z\d\-]+(\.[_a-zA-Z\d\-]+)+";
exp->Exec(data); Memo1->Lines->Add(exp->Match[0]); while(exp->ExecNext()){
Memo1->Lines->Add(exp->Match[0]);
}
delete exp;

Помогите что делать сам уже разобраться не могу.

 

ну тебе явно говорят, что у тебя проблема с размерами массива.
1. Хотелось бы увидеть твой код, а не пример.
2. подозреваю сразу без exec обращение к 0-му элементу.

 

это и есть весь, код в файле response.html просто закинуты мыла, при попытке выполнения регулярки выдает ошибку.

 

Человеки, но может кто-то сможет помочь с вопросм уже готов даже заплатить (нервы дороже =))))

 

надо проверять на if Reg->Exec всегда и только потом Match