ADOConnection1.ConnectionString := 'Provider=VFPOLEDB.1;Data Source=путь к файлу;Mode=ReadWrite;Password=" ";Collating Sequence=MACHINE;DELETED=False;'
ADOConnection1.ConnectionString := 'Provider=VFPOLEDB.1;Data Source=путь к файлу;Mode=ReadWrite;Password=" ";Collating Sequence=MACHINE;DELETED=False;'