Конфликт потоков, работающих с одним массивом

//---------------------------------------------------------------------------
struct Data
{
    Data()
    {
        lock= new TCriticalSection;
        for(int i=0; i<10; ++i) array[i]= i;
    }
    ~Data(){  delete lock; }
 
    int array[10];
    TCriticalSection* lock;
} ;
//---------------------------------------------------------------------------
class MyThread: public TThread
{
    public:
 
    __fastcall MyThread(Data* data,int op,bool CreateSuspended):
         TThread(CreateSuspended),
         data_(data),
         op_(op)
    {
 
    }
 
    protected:
     void __fastcall Execute()
     {
        for(int i=0; i<10; ++i)
        {
            data_->lock->Enter();
            try
            {
                data_->array[i]+= op_;
            }
            __finally
            {
                data_->lock->Leave();
            }
        }
     }
 
    private:
        Data* data_;
        int op_;
};
 
Data data;
MyThread* thread1= 0;
MyThread* thread2= 0;
//---------------------------------------------------------------------------
void __fastcall TForm1::TerminateThreadX(TObject *Sender)
{
    if(Sender==thread1)
    {
        Memo1->Lines->Add("Поток #1 завершен.");
        thread1= 0;
    }
    else
        if(Sender==thread2)
        {
            Memo1->Lines->Add("Поток #2 завершен.");
            thread2= 0;
        }
 
    if(!thread1 && !thread2)
    {
        Memo1->Lines->Add("Массив:");
        for(int i=0; i<10; ++i)
        {
            Memo1->Lines->Add(data.array[i]);
        }
    }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    thread1= new MyThread(&data,+1,true);
    thread1->OnTerminate= &TerminateThreadX;
    thread1->FreeOnTerminate= true;
    thread1->Start();
 
    thread2= new MyThread(&data,-1,true);
    thread2->OnTerminate= &TerminateThreadX;
    thread2->FreeOnTerminate= true;
    thread2->Start();
}
//---------------------------------------------------------------------------