Компоненты:--------- DBGrid1
DBNavigator1
Query1
DataSource1
Настройка-----------
DataSource1
AutoEdit=true
DataSet=Query1
Enabled=true
Name=DataSource1
Tag=0
DBGrid1
DataSource=DataSource1
String dr=GetCurrentDir()+"\\";
//Query1->DatabaseName="BAZA.db" ;
Query1->Close();
// ?enoei e?aie i?aauaouee SQL cai?in
Query1->SQL->Clear();
// Iacia?aai SQL naienoao Query1 cia?aiea oaenoa a Memo1.
Query1->SQL->Add("SELECT * FROM \""+dr+"DB.dbf\"");
ComboBox1->Text="SELECT * FROM \""+dr+"DB.dbf\"";
// Auiieiyai SQL cai?in e ioe?uaaai Query1
Query1->Open();
Query1->Active=true;
Edit1->Text="SELECT * FROM \""+dr+"DB.dbf\"";
****************************************************************