Курсовая работа: Автоматизированная система учета абонентов библиотеки

Edit2->Text = Table1N_doc->AsString;

Edit3->Text = Table1D_vozvrata->AsString;

Edit4->Text = Table1Flag_vozvrata->AsString;

Edit5->Text = Table1Shtraf->AsString;

Table1->Post(); //запись данных

}}

}

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

void __fastcall TForm2::Button2Click(TObject *Sender)

{

Table1->Insert();

}

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

void __fastcall TForm2::Button3Click(TObject *Sender)

{

if ( Application->MessageBox(

"Действительно хотите удалить запись?",

"Подтвердите решение",

MB_YESNO+MB_ICONEXCLAMATION)==IDYES)