Добрый день!

Кто подскажет код обработчика событий закрытия активного окна где выполняется анимация?

Form!->Close(); не срабатывает. Различные варианты Terminate тоже. Как быть?

Спасибо!

Что это за окно? Что за анимация?

Быстро генерируется цветовая гамма в окне(на экране)

Покажите код создания окна. и с куда вызывается FormX->Close()?

void __fastcall TForm1::Button2Click(TObject *Sender)
{

 Form1->WindowState= wsMaximized;

int (компоненты, массивы)

......

void __fastcall TForm1::getNdColor(int m_num)
{
       TColor m_color1, m_color2


        m_color1 =(TColor)RGB(255,255,0);
    m_color2 =(TColor)RGB(255,100,0);

// вывод на экран

if(m_num == 1)
     {
    Form1->Color = m_color1;
    Form1->Repaint();
        Application->ProcessMessages();
    stopForSecond();
     }
     else if(m_num == 2)
     {
    Form1->Color = m_color2;
    Form1->Repaint();
        Application->ProcessMessages();
    stopForSecond();

После этого в конце реализую обычную кнопку

void __fastcall TForm1::Button3Click(TObject *Sender)
{
Form1->Close();
}