Курсовая работа: Реляційна база данних трудової книжки
CheckBox4->Checked = Table1->Fields->FieldByName("isstklasigod")->AsInteger ? true:false;
CheckBox5->Checked = Table1->Fields->FieldByName("isgpdgod")->AsInteger ? true:false;
CheckBox6->Checked = Table1->Fields->FieldByName("iskruzok")->AsInteger ? true:false;
CheckBox7->Checked = Table1->Fields->FieldByName("isklasruk")->AsInteger ? true:false;
CheckBox8->Checked = Table1->Fields->FieldByName("iskabinet")->AsInteger ? true:false;
CheckBox9->Checked = Table1->Fields->FieldByName("isproverkatet")->AsInteger ? true:false;
CheckBox10->Checked = Table1->Fields->FieldByName("ispsiholog")->AsInteger ? true:false;
CheckBox11->Checked = Table1->Fields->FieldByName("isorganizator")->AsInteger ? true:false;
CheckBox23->Checked = Table1->Fields->FieldByName("ismuzskola")->AsInteger ? true:false;
//utrimannya
CheckBox12->Checked = Table1->Fields->FieldByName("isprofsoyuz")->AsInteger ? true:false;
CheckBox13->Checked = Table1->Fields->FieldByName("islgotnik")->AsInteger ? true:false;
CheckBox14->Checked = Table1->Fields->FieldByName("ismnogodetmama")->AsInteger ? true:false;
CheckBox15->Checked = Table1->Fields->FieldByName("isodinokmama")->AsInteger ? true:false;
CheckBox16->Checked = Table1->Fields->FieldByName("isvdova")->AsInteger ? true:false;
CheckBox17->Checked = Table1->Fields->FieldByName("isvdovec")->AsInteger ? true:false;
CheckBox18->Checked = Table1->Fields->FieldByName("isdetiinvalidi")->AsInteger ? true:false;
CheckBox21->Checked = Table1->Fields->FieldByName("ispens")->AsInteger ? true:false;
//sotrudniki
CheckBox19->Checked = Table1->Fields->FieldByName("issotrudnik")->AsInteger ? true:false;
RadioButton1->Checked = Table1->Fields->FieldByName("isadminsotr")->AsInteger ? true:false;
//derzsluzbovci
CheckBox20->Checked = Table1->Fields->FieldByName("isderzsluzbovec")->AsInteger ? true:false;
}
//---------------------------------------------------------------------------
void __fastcall Talgo::FormClose(TObject *Sender, TCloseAction &Action)
{
activeflag=0;
Table1->Close();