Прерывание работы функции по нажатию кнопки

[Assa_13]

Люди добрые, не останьтесь равнодушны!
Необходимо разработать приложение, которое в общем виде представляем собой решение системы и построение графика найденного решения.
Поскольку процедура нахождения решения может быть долгой, то должна быть и возможность прервать поиск решения.
Логика понятна, а вот с реализацией проблемы. Вот как я себе представляю:
- Есть главная форма (mainForm) где пользователь задает параметры и нажимает кнопку "Найти решение";
- После этого открывается форма (progressForm) которая содержит надпись "Идет поиск решений" и кнопку
"Прервать"
- Если пользователь нажимает кнопку "Прервать" , необходимо остановить функцию поиска решения и закрыть
форму (progressForm) и дальше ничего не делать;
- Иначе, если функция отработала до конца и нашла решение, необходимо закрыть форму (progressForm) и на
форме (mainForm) отобразить график;
- Иначе, если функция отработала до конца, но не нашла решение, необходимо закрыть форму (progressForm) и
выдать сообщение о том, что функция не справилась с решением.
Вопрос заключается в том, как реализовать отображение формы progressForm с возможностью прерывания. Главная форма и функция поиска решений уже реализованы. Осталось реализовать именно возможность прерывания.
Помогите пожалуйста. Заранее спасибо!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!

[Krok27]

Где нить в разделе private: формы объявим переменную:

bool FExit;

В конструкторе формы инициализируем ее значением

FExit = false;

или еще лучше в списке инициализации или еще в другом месте, где удобно:

__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner), FExit(false)
{
}

Далее по кнопке запускаем процесс вычисления, видимо в цикле:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
	while(!FExit)
	{
		// вычисления
		Application->ProcessMessages();
	}
	// это для последующего запуска процесса по этой же кнопке
       FExit = false;
       //здесь закроем форму прогресса	
         ProgressForm1->Close();
}

или

for(int i=0 ; i < 100500100; ++i)
{
// вычисления     
    Application->ProcessMessages();
     if(FExit)
           break;
}

или

do
{
     // вычисления 
     Application->ProcessMessages();
}while(!FExit);

По второй кнопке прерываем процесс:

 FExit = true;

Есть еще множество изощренных способов прерывать длительный процесс...