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

zapros=zapros+"Стоимось >="+c1;

zapros=zapros+"and "+ "Стоимось <= "+c2;

if (Edit4->Text!="")

{a=Edit4->Text;

zapros=zapros+" and "+ " Авто like "+"'"+a+"'";}

if (Edit6->Text!="")

{m=Edit6->Text;

zapros=zapros+" and "+ " Марка like "+"'"+m+"'";}

zapros=zapros+";";

ADOQuery1->Close();

ADOQuery1->SQL->Clear();

ADOQuery1->SQL->Add(zapros);

ADOQuery1->ExecSQL();

ADOQuery1->Active=true;

if (ADOQuery1->RecordCount==0)

{ ShowMessage("Ничего не найдено!");

DataSource1->DataSet=ADOTable1; }

else DataSource1->DataSet=ADOQuery1;

}

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

Unit3

#include <vcl.h>

#pragma hdrstop

#include "Unit3.h"

#include "Unit2.h"

# include "Unit2.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"