Edit2->Text=Edit1->Text[1];
Form1->TabControl1->Tabs->Text[0] = Table1->Fields->Fields[0]->AsString[1];