Курсовая работа: Реляційна база данних трудової книжки
Query10->Open();
}
void Talgo::vbazu(){
Table1->Refresh();
Table1->Edit();
// uchiteli
Table1->Fields->FieldByName("iskategoriya")->AsInteger = CheckBox3->Checked;
Table1->Fields->FieldByName("isnachskgod")->AsInteger = CheckBox2->Checked ? 1:0;
Table1->Fields->FieldByName("isstklasigod")->AsInteger = CheckBox4->Checked ? 1:0;
Table1->Fields->FieldByName("isgpdgod")->AsInteger = CheckBox5->Checked ? 1:0;
Table1->Fields->FieldByName("iskruzok")->AsInteger = CheckBox6->Checked ? 1:0;
Table1->Fields->FieldByName("isklasruk")->AsInteger = CheckBox7->Checked ? 1:0;
Table1->Fields->FieldByName("iskabinet")->AsInteger = CheckBox8->Checked ? 1:0;
Table1->Fields->FieldByName("isproverkatet")->AsInteger = CheckBox9->Checked ? 1:0;
Table1->Fields->FieldByName("ispsiholog")->AsInteger = CheckBox10->Checked ? 1:0;
Table1->Fields->FieldByName("isorganizator")->AsInteger = CheckBox11->Checked ? 1:0;
Table1->Fields->FieldByName("ismuzskola")->AsInteger = CheckBox23->Checked ? 1:0;
//sotr
Table1->Fields->FieldByName("isadminsotr")->AsInteger = RadioButton1->Checked ? 1:0;
// urtimannya
Table1->Fields->FieldByName("isprofsoyuz")->AsInteger=CheckBox12->Checked ? 1:0;
Table1->Fields->FieldByName("islgotnik")->AsInteger =CheckBox13->Checked ? 1:0;
Table1->Fields->FieldByName("ismnogodetmama")->AsInteger=CheckBox14->Checked ? 1:0;
Table1->Fields->FieldByName("isodinokmama")->AsInteger=CheckBox15->Checked ? 1:0;
Table1->Fields->FieldByName("isvdova")->AsInteger=CheckBox16->Checked ? 1:0;
Table1->Fields->FieldByName("isvdovec")->AsInteger=CheckBox17->Checked ? 1:0;
Table1->Fields->FieldByName("isdetiinvalidi")->AsInteger=CheckBox18->Checked ? 1:0;
Table1->Fields->FieldByName("ispens")->AsInteger=CheckBox21->Checked ? 1:0;
Table1->Post();