//这是使用ADO的方式。如果用UDAC 会更简单
ADODataSet1->CommandText = "SELECT A.*,B.* FROM MyTable A Left Join NextTable B";
ADODataSet1->Open();
void __fastcall TFMPersonLeave::ADODataSet1AfterOpen(TDataSet *DataSet)
{
_di_Properties p = ADODataSet1->Recordset->Properties ;
//设定删除时只作用於表
p->Item["Unique Table"]->Set_Value("MyTable");
//设定数据更改时用动态命令取回数据。
p->Item["Resync Command"]->Set_Value(
"SELECT A.*,B.* FROM MyTable A Left Join NextTable B WHERE A.ID = ?");
}