![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Текущий каталог программы [D5, D6, Win95/98, WinXP]
staratel © (2002-08-12 14:30:00)Люди, помогите кто может.
Как сделать каталог текущим? При запуске программы нужно установить каталог с этой программой текущим. В каталоге есть еще два подкаталога из которых нужно запустить дополнительные приложения так, чтобы для их запуска не описывать полный путь и не привязывать его к определенному диску. В VBasice это делается просто а в Delphi?
Если можно, то лучше на примере.
Leran2002 (2002-08-12 14:56:00) [1]SetCurrentDir(ExtractFileDir(ParamStr(0));
или
SetCurrentDirectory(PChar(ExtractFileDir(ParamStr(0)));
Anatoly Podgoretsky (2002-08-12 14:52:00) [2]Многое, где инициализация ProgramPath, параметр передается неверно, надо Pchar(ProgramPath)
staratel (2002-08-12 14:49:00) [3]P.S. Пробовал использовать API SetCurrentDirectory(@ProgramPath)- при компилировании ошибок не выдает, но и дополнительные программы не запускаются, объявлял примерно так:
path array[0..1] to PChar;
ProgramPath: string;
.....
SetCurrentDirectory(@ProgramPath);
path[0]:="\Дополнительный каталог\исполняемый файл";
path[1];="аналогично";
....
или я что-то делаю неправильно?
В Delphi я еще новичок.
Leran2002 (2002-08-12 14:44:00) [4]Вот тебе установка текущего каталога:
SetCurrentDir(ExtractFileDir(ParamStr(0));
Lord Warlock (2002-08-12 14:34:00) [5]Функция ExtractFilePath(ParamStr(0)) возвращает полный путь твоей программы, где бы она не находилась. Соответственно приписываешь к нему все что нужно.