YA
FileName := TempDir + '\stream.data';
ArchiveFileName := TempDir + '\stream.7z';
для начала сделайте уникальные имена временным файламесли у вас работают несколько процессов с одним файлом - это явно будет приводить к конфликтам
Size: a a a
YA
FileName := TempDir + '\stream.data';
ArchiveFileName := TempDir + '\stream.7z';
для начала сделайте уникальные имена временным файламRS
Function NewerVersion(Q1,Q2 : TVersionQuad) : Boolean;
Function NewerVersion(V1,V2 : TProgramVersion) : Boolean;
Function NewerVersion(V1,V2 : String) : Boolean;
Модуль FileInfo
AS
AS
ЕI
СП
Function NewerVersion(Q1,Q2 : TVersionQuad) : Boolean;
Function NewerVersion(V1,V2 : TProgramVersion) : Boolean;
Function NewerVersion(V1,V2 : String) : Boolean;
Модуль FileInfo
RS
RS
RS
ДT
AS
Ш
Ш
AS
AK
AS
AK
AK