Форум: "WinAPI";
Текущий архив: 2003.12.19;
Скачать: [xml.tar.bz2];
ВнизБлокировка файла Найти похожие ветки
← →
zdn (2003-10-25 18:17) [0]Мастера помогите!!!!
Существует блокированый файл созданный внешним приложением (конкретно 1С, конкретно вход пользователя), известно что при добавлениии 1С туда информации о пользователе он увеличивается на 1024 байта. Если же пользователь покинул 1С блок в файле остается, но область блока разблокируется.
И вопрос как просмотреть файл из внешней программы (Delphi) (не 1С) и найти эти разблокированые области??????
Программный код:
Memo1.Lines.Clear;
if FileExists(FileName) then begin
try
hFile:=FileOpen(SG.Rows[SGARow].Strings[2]+"SYSLOG\links.tmp",fmShareDenyNone);
size:=Windows.GetFileSize(hFile,nil);
k:=ceil(size/1024);
for i:=1 to k do begin
try
j:=$1E8481+i;
if FileLock(hFile,j,1024) = 0 then
Memo1.Lines.Add("locked")
else
Memo1.Lines.Add("no locked");
finally
FileUnlock(hFile,j,1024);
end;
end;
finally
CloseHandle(hFile);
end;
Что не так?????
Заранее всем благодарен.
P.S. просьба к ведущему, неделю бьюсь над этим и пока без результатно, знаю, что не хватает знаний, вот и пытаюсь
узнать у сведущих мастеров, пожалуйста, не блокируйте вопрос,
это не спам, а жизненная необходимость.
← →
zdn (2003-10-26 13:07) [1]Вопрос снимается, хоть и не начал обговариваться, огромное спасибо Сергею Попову, указал на мою глупость и помог в решении проблемы.
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2003.12.19;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.061 c