Текущий архив: 2008.02.03;
Скачать: CL | DM;
Вниз
Игнорирование кода от совместного доступа к файлу Windows XP Найти похожие ветки
← →
Катунов Юрий © (2008-01-06 10:30) [0]Здравствуйте мастера и с новым 2008 годом. Пусть всё у вас будет коллеги. -))
Я тут сэмитировала совместный доступ к файлу на примере файла sam.
Вот такой вот код......
procedure TForm1.Button1Click(Sender: TObject);
var
f: TextFile;
s: string;
begin
s := "C:\WINDOWS.0\system32\config\sam";
AssignFile(f, s);
try
try
Reset(f);
except
exit;
end;
finally
CloseFile(f);
end;
end;
На ура работает в Windows98 и в WindowsME, а в WindowsXP - не хочет. Как игнорировать ошибки I/O 32 и I/O 103 в данном случае?
← →
Virgo_Style © (2008-01-06 14:14) [1]Разве в книжках и справке не написано, что именно делает Reset в случае ошибки?
← →
Alarm © (2008-01-06 14:24) [2]>Катунов Юрий © (06.01.08 10:30)
А где ты в Windows98 и в WindowsME нашел (или нашла, судя по "Я тут сэмитировалА") файлы SAM?
← →
Dennis I. Komarov © (2008-01-06 14:39) [3]Сейчас прочитает, и пароли вытаскивать будет :)
← →
Leonid Troyanovsky © (2008-01-06 18:11) [4]
> Катунов Юрий © (06.01.08 10:30)
> Как игнорировать ошибки I/O 32 и I/O 103 в данном случае?
Надо протяжно произнести "ээх.." и взмахнуть рукой.
--
Regards, LVT.
← →
Anatoly Podgoretsky © (2008-01-06 18:17) [5]Вот этот завет тебе поможет
http://www.podgoretsky.com/DM/BadWill.html#BW-04
← →
icWasya © (2008-01-06 22:25) [6]IoResult + F1
← →
Германн © (2008-01-07 00:51) [7]А самая "тупая" ошибка тут:
> finally
> CloseFile(f);
> end;
>
Страницы: 1 вся ветка
Текущий архив: 2008.02.03;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.062 c
