![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
функция RenameFile, не могу разобраться.. [D7]
-=snoop=- © (2005-08-16 11:57:00)привет всем,
козалось бы , что может быть легче?
function RenameFile(const OldName, NewName: string): Boolean
в моём случае выглядит
RenameFile(gPthVl+'pro\user.pro',gPthVl+'pro\user.old');
где, gPthVl = e:\bst\proили любой другой пить...
не могу добиться работы ф-ии...
подскажите , что не так?
Anatoly Podgoretsky (2005-08-17 19:55:00) [1]-=snoop=- © (17.08.05 05:58) [28]
Ну и что, все равно надо закрыть.
Думкин (2005-08-17 06:46:00) [2]> -=snoop=- © (17.08.05 05:58) [28]
Что-то не так в городе датском. Диагностика такого уровня на расстоянии - дело дорогое. Вы бы все-таки напряглись сами - немного, для начала.
-=snoop=- (2005-08-17 05:58:00) [3]2Плохиш , да ладно, дядя, что за бред! "нет буквы е:", ты сам-то представляешь такую ситуацию? бред какой-то! еще и вруном назвали....
2Anatoly Podgoretsky, я его и не открывал...
Anatoly Podgoretsky (2005-08-16 13:03:00) [4]-=snoop=- © (16.08.05 12:51) [24]
Закрой файлики перед переименованием.
Плохиш (2005-08-16 13:02:00) [5]
> -=snoop=- © (16.08.05 12:51) [24]
Не люблю врунов ([14])
Anatoly Podgoretsky (2005-08-16 13:02:00) [6]-=snoop=- © (16.08.05 12:29) [15]
не прилично говорить о присутствующем в 3-м лице
Тогда будет смешно выглядеть
Slider007 © (16.08.05 12:27) [13]
Tonich © (16.08.05 12:20) [11]
может у меня ваще компа нет ?
При чем тут его компьютер?
-=snoop=- (2005-08-16 12:51:00) [7]a := 'E:\bst\pro\user.pro' ;
b := 'E:\bst\pro\user.old' ;
RenameFile(a,b);
getlasterror() вернул 32... поисчу коды ошибок...
-=snoop=- (2005-08-16 12:50:00) [8]руками дает, без проблем
Думкин (2005-08-16 12:46:00) [9]А руками - в проводнике, самому - каков результат?
-=snoop=- (2005-08-16 12:46:00) [10]2Думкин,
0.чем же я стебаю?
1.будь по внимательнее [14]
2.атрибуты пусты
3.для проверки, пробовал переписать файл в корень с: =0
вот весь код, хотя какой тут код...
procedure tform1.p_copyANDstr;
var
a, b : string ;
lstErr : integer ;
begin
a := 'c:\user.pro' ;
//b := 'e:\bst\pro\user.old' ;
ChangeFileExt(a, '.old');
все в соответствии с хелпом дельфЁвым
Думкин (2005-08-16 12:41:00) [11]> [19] -=snoop=- © (16.08.05 12:38)
Стебаешься пока ты. Что возвращает функция? Анализируется ли GetLastError? Каковы атрибуты файла?
-=snoop=- (2005-08-16 12:38:00) [12]2Tonich, не, скорее всего, потусторонние силы мешают головке винчестера попасть в сектор......какой телефон у охотников за приведеньями?
ладно уже стебаться
Tonich (2005-08-16 12:35:00) [13]тохда в продолжение темы )))))
может это сидюк)))
-=snoop=- (2005-08-16 12:34:00) [14]да не правда это, есть у меня и комп, на удиление и диск Е: на нем тож есть...как ни странно....
Tonich (2005-08-16 12:31:00) [15]
> Tonich © (16.08.05 12:20) [11]
так это что правда оказалась??????
ну вы батека даете)))
-=snoop=- (2005-08-16 12:29:00) [16]не прилично говорить о присутствующем в 3-м лице
-=snoop=- (2005-08-16 12:28:00) [17]2Tonich....и правда нет...чЁрт побери! ты меня спас!!))))
2Плохиш
GetLAstError ноль показывает
Slider007 (2005-08-16 12:27:00) [18]Tonich © (16.08.05 12:20) [11]
может у него ваще компа нет ?
bat00n (2005-08-16 12:27:00) [19]Вот под рукой делфя, щас попробовал. Все работает:
a := 'e:\bst\pro\user.pro' ;
ext := '.old';
if not RenameFile(a, ChangeFileExt(a,ext))
then ShowMessage('Фигу!');
Tonich (2005-08-16 12:20:00) [20]а может у него диска E нет )))))