Сохранение настроек программы в реестре

//--------------------------------------------------------------------------- 
void __fastcall TMainForm::FormCreate(TObject *Sender)

{
//Запись в реестр
TRegistry & RegKey = *new TRegistry(); 
RegKey.OpenKey("SOFTWARE\\MyApp\\FormPos\\MainForm", true); 
if (RegKey.ValueExists("Top"))
{
    temp = RegKey.ReadInteger("Top"); MainForm->Top = temp;
} 
if (RegKey.ValueExists("Left"))
{
    temp = RegKey.ReadInteger("Left"); MainForm->Left = temp;
}
if (RegKey.ValueExists("Width")) 
{
    temp = RegKey.ReadInteger("Width");
    MainForm->Width = temp;
}
if (RegKey.ValueExists("Height")) 
{
    temp = RegKey.ReadInteger("Height"); 
    MainForm->Height = temp; 
}
delete & RegKey; 
}
//--------------------------------------------------------------------------- 
void __fastcall TMainForm::FormDestroy(TObject *Sender)
{ //Сохранение
    form positions to registry TRegistry & RegKey = *new TRegistry(); 
    RegKey.OpenKey("SOFTWARE\\MyApp\\FormPos\\MainForm", true);
if (MainForm->WindowState == wsNormal) 
{
    RegKey.WriteInteger("Left", MainForm->Left);
    RegKey.WriteInteger("Top", MainForm->Top);
    RegKey.WriteInteger("Width", MainForm->Width);
   RegKey.WriteInteger("Height",MainForm->Height); 
} 
delete & RegKey;
}