Курсовая работа: Реляційна база данних трудової книжки

Query13->SQL->Add(

"select constanta,znach from z_nastr_derzsluz_rang where id="+wwDBLookupCombo9->Text

);

Query13->Open();

}

}

//---------------------------------------------------------------------------

void __fastcall Talgo::CheckBox20Click(TObject *Sender)

{

Table1->Edit();

if(CheckBox20->Checked){

Table1->Fields->FieldByName("isderzsluzbovec")->AsInteger = 1;

GroupBox20->Visible=true;

}

else

{

Table1->Fields->FieldByName("isderzsluzbovec")->AsInteger = 0;

GroupBox20->Visible=false;

}

Table1->Post();

}

//---------------------------------------------------------------------------

void __fastcall Talgo::wwDBLookupCombo10Change(TObject *Sender)

{

if(activeflag){

Query14->Close();

Query14->SQL->Clear();

Query14->SQL->Add(

"select constanta,znach from z_nastr_derzsluz_intensiv where id="+wwDBLookupCombo10->Text