![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Ошибка ChDir
Сергеев Ваня © (2013-10-21 18:43:00)Добрый вечер! Подскажите в чем может быть дело? Использую в программе команду ChDir для перехода в подпапку программы в ее же директории. Папка существует,раньше все работало нормально,а сегодня стала вылетать ошибка 103 Покопавшись в проге нашел что именно на строке ChDir('Docs'); Ничего не менял в коде,атрибуты папки тоже не изменились. В чем дело не пойму.... Дельфи 2010
[ВладОшин] (2013-10-22 17:19:00) [1]
> Я устал.
я ухожу %)
Smile (2013-10-22 16:40:00) [2]Неужели не устали отвечать нубу, не читающему ответы и рекомендации?
Я устал.
:(
Медвешонок Порошок (2013-10-22 16:36:00) [3]с той же папкой. Мистика...
Ага мистика.
И зовут эту Мистику ofNoChaneDir у open/save диалога
Сергеев Ваня (2013-10-22 15:47:00) [4]Благодарю всех за полезные советы!
Inovet (2013-10-22 13:18:00) [5]> [25] [ВладОшин] © (22.10.13 12:52)
А ты старался, жирным выделял.
[ВладОшин] (2013-10-22 12:52:00) [6]точно не читатель :)
brother (2013-10-22 11:59:00) [7]> думал тут какую идею подкинут
ты хотел не идею, а чтоб за тебя все сделали...
Сергеев Ваня (2013-10-22 11:53:00) [8]Нет времени пока разбираться, думал тут какую идею подкинут... Похоже ни у кого такого не было :(
brother (2013-10-22 11:26:00) [9]> длинный текст,писать лень. Да ну их эти ошибки,работает
> по другому,пусть работает,потом буду разбираться
а зря!
Сергеев Ваня (2013-10-22 10:47:00) [10]Пользователь увидит ошибку независимо как будет запускать прогу. Вначале тестирую в среде разработки. Ошибка не секретная,длинный текст,писать лень. Да ну их эти ошибки,работает по другому,пусть работает,потом буду разбираться. Пока нет времени.
Smile (2013-10-22 10:09:00) [11]Для кого пишется программа?
> Запускаю из среды разработки программу.
Неужели пользователь будет запускать твою программу из среды разработки?
:)
[ВладОшин] (2013-10-22 10:07:00) [12]
> Еще начались чудеса с Rewrite(F) Тоже при выполнении стала
> вылетать ошибка
Секретная?
[ВладОшин] (2013-10-22 10:05:00) [13]не читатель?
> и то, и то используют одно и тоже
> Только одна возбуждает ошибку, вторая нет
procedure ChDir(P: PChar);
begin
{$IFDEF MSWINDOWS}
if not SetCurrentDirectory(P) then
{$ENDIF}
{$IFDEF LINUX}
if __chdir(P) <> 0 then
{$ENDIF}
InOutError;
end;
MonoLife (2013-10-22 04:30:00) [14]смущает > ChDir('Docs');
почему не полный путь? И если Docs в каталоге программы, то хоть Extractpath(Application.Exename)+'Docs' использовать.
MonoLife (2013-10-22 04:30:00) [15]смущает > ChDir('Docs');
почему не полный путь? И если Docs в каталоге программы, то хоть Extractpath(Application.Exename)+'Docs' использовать.
Сергеев Ваня (2013-10-21 21:42:00) [16]ChDir поборол SetCurrentDir-ом,а Rewrite(F) сменил TStringList Нет времени долго разбираться, может потом еще гляну... Интересно все-таки что ему жить мешало? :)
Сергеев Ваня (2013-10-21 20:20:00) [17]Запускаю из среды разработки программу.
SergP (2013-10-21 19:51:00) [18]Может попробовать так:
initialization
SetCurrentDir(ExtractFileDir(paramstr(0)));
?
brother (2013-10-21 19:41:00) [19]ты с ярлыка запускаешь?
имхо текущая папка задана не верно...
Сергеев Ваня (2013-10-21 19:41:00) [20]Было ChDir стало SetCurrentDir, рабочая папка та что нужно