C++ Builder XE如何多组件装入数组处理

TList * Mydatelist;
ConvDate *DD;
try
{

    Mydatelist =new TList;

//装入组件进入列表
    Mydatelist->Add(RzURLLabel1);
    Mydatelist->Add(RzURLLabel2);
    Mydatelist->Add(RzURLLabel3);
    Mydatelist->Add(RzURLLabel4);
    Mydatelist->Add(RzURLLabel5);
    Mydatelist->Add(RzURLLabel6);
    Mydatelist->Add(RzURLLabel7);
    Mydatelist->Add(RzURLLabel8);

//读取列表中的组件

        ((TRzURLLabel *)Mydatelist->Items[i])->Font->Color=clWhite ;
        //显公历
        ((TRzURLLabel *)Mydatelist->Items[i])->Caption=AnsiString(LL);

}

 __finally
 {
    delete Mydatelist;
    Mydatelist=NULL;

}