I use VirualDataSet and VirtualQuery this way:
Code: Select all
ProxyDS=new TVirtualDataSet(NULL);
ProxyDS->FieldDefs->Clear();
ProxyDS->FieldDefs->Add("No",ftInteger,0,false);
ProxyDS->FieldDefs->Add("IP",ftString,64,false);
ProxyDS->OnGetRecordCount=ProxyDSGetRecordCount;
ProxyDS->OnGetFieldValue=ProxyDSGetFieldValue;
ProxyDS->Open();
ProxyQry=new TVirtualQuery(NULL);
ProxyQry->FetchAll=true; // Bug if true !
ProxyQry->Options->QueryRecCount=true;
ProxyQry->SourceDataSets->Add(ProxyDS,"RunTimeProxyList");
ProxyQry->SQL->Add("SELECT * FROM RunTimeProxyList");
ProxyQry->Open();
VirtualDAC version 10.2.6, RAD Studio 2007.
Please fix this bug !