Здравствуйте уважаемые форумчане! Изучаю Делфи чуть более месяца, одной из поставленых задач является копирование информации из директории текущего пользователя. копировать папку решил этим методом, он рабочий.
Код:
application.ProcessMessages();
FillChar(Buffer, sizeof(Buffer), #0);
p := @buffer;
StrECopy(p, PChar(FromFolder)); //îòêóäà
FillChar(Fo, sizeof(Fo), #0);
Fo.Wnd := Application.Handle;
Fo.wFunc := FO_COPY;
Fo.pFrom := @Buffer;
Fo.pTo := PChar(ToFolder); //êóäà
Fo.fFlags := 0;
if ((SHFileOperation(Fo) <> 0) or (Fo.fAnyOperationsAborted <> false)) then
ShowMessage('File copy process cancelled')
и все бы хорошо, да вот только как мне адрес указать правильно синтаксически?иначе прога не видит что копировать. до этого в батнике я указывал %USERPROFILE% и было очень удобно. А как быть здесь? подскажите, заранее спасибо))