//--------------------------------------------------------------------------- void __fastcall TAddressBook::AssignTo(TPersistent* Dest) { TStrings *DestStrings = dynamic_cast<TStrings *>(Dest); if (DestStrings) { DestStrings->BeginUpdate(); try { DestStrings->Clear(); DestStrings->AddStrings(FNames); } __finally { DestStrings->EndUpdate(); } } }
//--------------------------------------------------------------------------- void __fastcall TPropertiesDialog::LoadRemoteTokens(TComboBox * ComboBox, const TRemoteTokenList * List) { TStrings * Items = ComboBox->Items; Items->BeginUpdate(); try { Items->Clear(); if (List != NULL) { int Count = List->Count(); for (int Index = 0; Index < Count; Index++) { Items->Add(LoadRemoteToken(*List->Token(Index))); } } } __finally { Items->EndUpdate(); } }