[jhcaboverde]

ADODataSet1.ConnectionString:='Provider=VFPOLEDB.1;Data Source='+ExtractFilePath(Application.ExeName)+';Password="";Collating Sequence=MACHINE';

ADODataSet1.CommandText:='select * from datos';
ADODataSet1.Active := True;