Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
ВнизОшибка перемещения файла Найти похожие ветки
← →
>|< (2012-03-01 19:42) [0]Коллеги!
Подскажите, в чем ошибка данного кода:
PathScanned:=ExtractFilePath(FileName) + "scanned\" +ExtractFileName(Filename);
if MoveFile(PAnsiChar(FileName), PAnsiChar(PathScanned)) then
// DeleteFile(Filename);
cdsImagesImagePath.AsString := ExtractFilePath(Filename) + "\scanned\"
else
ShowMessage("Ошибка! Вот ее код: " + IntToStr(GetLastError));
Выдает код 3 - Неправильные параметры
Все пути существуют, файл тоже.
Заранее благодарен!
← →
Германн © (2012-03-01 20:09) [1]
> ExtractFilePath(Filename) + "\scanned\"
← →
sniknik © (2012-03-01 20:15) [2]> Все пути существуют
сомневаюсь...
> PathScanned:=ExtractFilePath(FileName) + "scanned\" +ExtractFileName(Filename);
> cdsImagesImagePath.AsString := ExtractFilePath(Filename) + "\scanned\"
← →
>|< (2012-03-01 20:38) [3]
> sniknik © (01.03.12 20:15) [2]
Функция ExtractFilePath(FileName) возращает путь с завершающим символом слэша \. Если поставить еще один в "\scanned\", тогда их там будет два.
Изначально так и было, но ошибка все равно одна и та же
← →
>|< (2012-03-01 20:46) [4]Разобрался. Всем спасибо!
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.061 c