Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.04.18;
Скачать: CL | DM;

Вниз

HELP!!!   Найти похожие ветки 

 
Olgerd ©   (2002-03-11 21:07) [0]

Люди! Помогите! Я в проге на Delphi сделал так
AssignFile(f,"очень_важный_файл);Rewrite(f);
Как мне восстановить его?!!


 
Shaman_Naydak ©   (2002-03-11 21:37) [1]

Ага, то есть файл у тебя есть, но он имеет нулевой размер.
Если под фатом, то берешь и дискедитором делаешь цепочку, начиная с того кластера на который он указывает сейчас..
Последний Unerase из досовских может за тебя 70% работы сделать.
Под NTFS на порядок сложнее, но принцип тот же..
Главное, ничего не ПИСАТЬ на этот диск.
Если сам плохо разбираешься, а файл действительно ОЧЕНЬ важный, отдай разбирающимся людям, пусть попробуют..
Гарантии никакой нет..
но тут плюс то, что начало цепочки не потеряно, а если он еще вмещается в один кластер, то железно восстановишь (хотя когда это очень важные файлы занимали всего один кластер :))


 
Olgerd ©   (2002-03-12 15:39) [2]

У меня файл - большой фильмик метров на 500, но в принципе, если там пара кластеров потеряются, то ничего страшного.
Но все программы для восстановлекния файлов ничего не находят, ведь файл-то не стёрт.


 
Андрей Сенченко ©   (2002-03-12 15:49) [3]

>> Olgerd © (12.03.02 15:39)
>> если там пара кластеров потеряются, то ничего страшного.

Ну да, практически ничего, кроме того, что если формат был AVI, то при потерянных кластерах можешь сказать ему "аривидерчи".

>> Shaman_Naydak © (11.03.02 21:37)
>> Главное, ничего не ПИСАТЬ на этот диск.

Так то оно так конечно. ... Только вот сразу по освобождениии такого шикарного пространства ну просто все, что падает в Temporary Internet Files прямо сейчас туда и рванулось.



Страницы: 1 вся ветка

Текущий архив: 2002.04.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.008 c
3-57628
skiph
2002-03-28 12:33
2002.04.18
Логическое поле в таблице


1-57742
Kirill_Other
2002-04-05 12:35
2002.04.18
Как увидеть добавленные свойства published в Object Inspector


7-57909
Lizard
2002-01-20 15:08
2002.04.18
Какой модуль необходимо подключить чтобы сработала ShellExecute(0, nil,Pchar( explorer.exe ),nil,nil,1) ?


1-57709
mike.dld
2002-04-06 00:22
2002.04.18
Delphi4 vs Delphi6


3-57617
ZDN
2002-03-26 08:54
2002.04.18
Помогите чайнику немытому, пожалуйста!