Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Работа с каталогами [D7, Win2k, WinXP]

Shamansky © (2004-12-22 21:17:00)
Кто-нибудь знает как можно поменять текущий каталог на другой, надо скопировать файл в каталог, а как зайти в этот каталог не знаю, с абсолютным адресом работать не хочется.

Fay (2004-12-22 21:57:00) [1]
2 Shamansky (22.12.04 21:55) [17]
Удачи тебе большой. Очень скоро она тебе пригодится.

Shamansky (2004-12-22 21:55:00) [2]
Помогло вот это: chdir('dirname');

Kolan (2004-12-22 21:53:00) [3]
function TForm1.AddMyPath(Path: string): string;
const
MyPath = 'C:\';
begin
Result := MyPath + Path;
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
BitBtn1.Caption := AddMyPath('sdfs');
SaveToFile(AddMyPath('cvxvcvxv.txt'));
end;

Fay (2004-12-22 21:53:00) [4]
Интересно, что именно помогло. И от чего.

Shamansky (2004-12-22 21:50:00) [5]
Спасибо, помогло

Sun bittern (2004-12-22 21:46:00) [6]
Shamansky (22.12.04 21:39) [7]

Нужен текущий каталог программы?

begin...end (2004-12-22 21:46:00) [7]
> [11] Fay © (22.12.04 21:42)

Нет никаких гарантий того, что текущий каталог не изменится между передачей параметра в метод SaveToFile и началом (а тем более - концом) исполнения операторов этого метода.

:-)

Fay (2004-12-22 21:42:00) [8]
2 Gero © (22.12.04 21:41) [10]
Нет никаких гарантий того, что текущий каталог не изменится между
ChDir('X:\Path');
и
SaveToFile('cvxvcvxv.txt');

Gero (2004-12-22 21:41:00) [9]
ChDir('X:\Path');
SaveToFile('cvxvcvxv.txt');

Fay (2004-12-22 21:41:00) [10]
На каталог выше
SaveToFile(ExtractFilePath(ParamStr(0))+'..\cvxvcvxv.txt')

Fay (2004-12-22 21:40:00) [11]
Похоже, это одна из тех задач, в который нельзя вникать, дабы не сдвинуться мозгами 8)

Shamansky (2004-12-22 21:39:00) [12]
В том то и дело, что это абсолютный путь, а как дать относительный, то есть относительно исполняемого файла я не помню

Sun bittern (2004-12-22 21:38:00) [13]
>>
Да нет каталог я найти могу, как на него указатель дать, чтобы
код savetofile('cvxvcvxv.txt'); сохранял уже в этот каталог

И всетаки не ясно. По вашим словам одно взаимно исключает другое :). Каталог найти вы можете, а указать его путь - нет. Это как?

Fay (2004-12-22 21:32:00) [14]
savetofile('x:\path\cvxvcvxv.txt');

Shamansky (2004-12-22 21:26:00) [15]
Да нет каталог я найти могу, как на него указатель дать, чтобы
код savetofile('cvxvcvxv.txt'); сохранял уже в этот каталог

begin...end (2004-12-22 21:25:00) [16]
> Shamansky (22.12.04 21:17)

> как можно поменять текущий каталог на другой

ChDir

Fay (2004-12-22 21:21:00) [17]
1) Бред какой-то.
2) Не хочется - попроси маму.

Sun bittern (2004-12-22 21:18:00) [18]
ФАК - поиск файлов, там же и выяснится, как каталог отыскать.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »