void __fastcall TfrmMainForm::WriteToMyRegistry(int table_count)
            {
            　　//TODO: Add your source code here
            　　TRegistry *MyRegistry=new TRegistry;
            　　MyRegistry->RootKey=HKEY_LOCAL_MACHINE;　 //改變缺省Rootkey
            if(!MyRegistry->OpenKey("Software\\Microsoft\\Windows\\Current\Version\\Run",true))  //打開主鍵
            　　 //這樣雙引號里面的東西就變成了CurrentKey
            　　 {
            　　　　 Application->MessageBox("注冊表內容無效", "讀取注冊表出錯",MB_ICONERROR);
            　　　　 MyRegistry->CloseKey();
            　　　　 delete MyRegistry;
            　　　　 return;
            　　　　}
            　　MyRegistry->WriteString("myrun","c:\\sthvcd\\sthvcd.exe");
            　　MyRegistry->CloseKey();
            　　delete MyRegistry;