Курсовая работа: Реляційна база данних трудової книжки
}
//---------------------------------------------------------------------------
void __fastcall Talgo::wwDBLookupCombo2Change(TObject *Sender)
{
if(activeflag){
Query2->Close();
Query2->SQL->Clear();
Query2->SQL->Add(
"select constanta from z_nastr_vch_kateg where id="+wwDBLookupCombo2->Text
);
Query2->Open();
}
}
//---------------------------------------------------------------------------
void __fastcall Talgo::wwDBLookupCombo3Change(TObject *Sender)
{
if(activeflag){
Query3->Close();
Query3->SQL->Clear();
Query3->SQL->Add(
"select constanta from z_nastr_vch_perevirkazosh where id="+wwDBLookupCombo3->Text
);
Query3->Open();
}
}
//---------------------------------------------------------------------------
void Talgo::knopka()
{
AnsiString x="";