Привет ребя !
Блин не могу допетрить ...почему не меняет текущий каталог
мне нужно перейти к подкаталогу DBF(там у меня справочники) и там найти файлик и к нему сделать запрос
однако ошибка запроса в том, что я остаюсь в той директории в которой находился, хотя я ...
т.е. он говорит что не нашел файл ...естественно он подкаталоге DBF
отладчиком значения PathProgram нормально с dbf
GetDir( 0, FSetup.PathProgram);
ChDir(FSetup.PathProgram+'\dbf\');
GetDir( 0, FSetup.PathProgram);
dm.DsSp.DataSet:=dm.QSp;
If FileExists(ExtractFilePath(Application.ExeName)+ 'DBF\' + 'str_podr.dbf') Then
begin
//Делаем запросы
with dm.QSP do
begin
DatabaseName:='Zat1c';
Close;
SQL.Clear;
SQL.Add('SELECT * FROM str_podr.dbf');
SQL.Add('ORDER BY CODE,NAME');
//ShowMessage(dm.QSp.SQL.Text);
Open;
end; //with
DBLookupComboboxEh1.ListSource:=dm.DsSp;
DBLookupComboboxEh1.ListField:='NAME';
DBLookupComboboxEh1.KeyField:='CODE';
DBLookupComboboxEh1.Text:='01';
end
else
begin
ShowMessage('Нет файла справочника структурных подразделений !');
exit;
FSetup.ModalResult:=1;
end;
Не могу млин перейти и запрос сделать ...
CHDIR
Модераторы: Duncon, Naeel Maqsudov, Игорь Акопян, Хыиуду
Jojo®
- Naeel Maqsudov
- Сообщения: 2570
- Зарегистрирован: 20 фев 2004, 19:17
- Откуда: Moscow, Russia
- Контактная информация:
Вместо
SELECT * FROM str_podr.dbf ORDER BY CODE,NAME
делайте
SELECT * FROM "dbf/str_podr.dbf" ORDER BY CODE,NAME
BDE создает экземляр коннекта к базе в котором прописан путь.
Все таблицы ищутся относительно ТОГО пути а CHDIR на это не влияет!
SELECT * FROM str_podr.dbf ORDER BY CODE,NAME
делайте
SELECT * FROM "dbf/str_podr.dbf" ORDER BY CODE,NAME
BDE создает экземляр коннекта к базе в котором прописан путь.
Все таблицы ищутся относительно ТОГО пути а CHDIR на это не влияет!