Реферат: Автоматизированная информационная система Малое авторемонтное предприятие

summa=0;

Memo1->Clear();

Memo1->Lines->Add(" -----------Авторемонт--------------");

Memo1->Lines->Add("---------------Чек покупателю------------");

bol=false;

Edit2->Text="0";

Label4->Caption=" ";

}

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

void __fastcall TForm2::N5Click(TObject *Sender)

{

ADOTable1->IndexFieldNames="Авто";

}

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

void __fastcall TForm2::N7Click(TObject *Sender)

{

ADOTable1->IndexFieldNames="Стоимось";

}

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

void __fastcall TForm2::N6Click(TObject *Sender)

{

ADOTable1->IndexFieldNames="Марка";

}

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

void __fastcall TForm2::Button7Click(TObject *Sender)

{

String zapros, c1,c2,a,m;

zapros="";

zapros="SELECT * FROM Avtoremont.Zapchasti WHERE ";