1nd1g0 писал(а):
Странно от тебя слышать. Блокировку он на файл ставит, открыв его на записьВсе, я понял почему. Если файл открыт по doOpen, то его надо обязательно закрыть по doClose. Код автозакрытия не сработает в этом случае, он срабатывает только когда файл оформляется по doCopyFromStream и ничего больше, до него нельзя открывать файл самому, или можно открывать, но тогда надо закрывать тоже самому
------------ Дoбавленo в 23.44:
Вот это место в коде
procedure THIFileStream._work_doCopyFromStream;
var s:PStream;O:boolean;
begin
O := (not Assigned(Fs))and _prop_AutoCopy;
if O then Open(_Data);
//...
if O then Free_And_Nil(Fs);
end;
O будет true только когда файл до этой функции не создан. И нет тут никакой блокировки данных.
Поиск
Друзья
Администрация