Одновременное использование (прокрутка) ScrollBox'a и динамическое размещение на нём компонентов

// глобальные переменные:
PrintTh *MyPrint;
TCppWebBrowser *WBRow[MAXROWS];
 
// а этот код создает компоненты и запускает поток их загрузки
        for (int i=0; i<MAXROWS; i++)     {
                WBRow[i] = new TCppWebBrowser (Form1);
                WBRow[i]->TOleControl::Parent = Form1->ScrollBox1;
        }
    MyPrint = new PrintTh (false);

#define MAXROWS 100 //количество создаваемых компонентов

extern TCppWebBrowser *WBRow[MAXROWS];
 
 
void __fastcall PrintTh::Execute()
{
        int SumH = 0;
        for (int i=0; i<MAXROWS; i++)     {
                WBRow[i]->Width = Form1->ScrollBox1->Width - 20;
                WBRow[i]->Top = SumH+10;
                SumH += WBRow[i]->Height+10;
        }
}

void __fastcall PrintTh::Execute()
{
        Synchronize(FCreate);
}
//---------------------------------------------------------------------------
void __fastcall PrintTh::FCreate()
{
        int SumH = 0;         for (int i=0; i<MAXROWS; i++)     {                 WBRow[i]->Width = Form1->ScrollBox1->Width - 20;                 WBRow[i]->Top = SumH+10;                 SumH += WBRow[i]->Height+10;         }
}