diff --git a/Units/NetflixQualityCheck.pas b/Units/NetflixQualityCheck.pas index 770e7b9..a435498 100644 --- a/Units/NetflixQualityCheck.pas +++ b/Units/NetflixQualityCheck.pas @@ -395,16 +395,20 @@ function SaveString(Str: string; FileName: WideString): Boolean; fileStream: TTntFileStream; begin Result := true; - fileStream := TTntFileStream.Create(FileName, fmCreate); try try + fileStream := TTntFileStream.Create(FileName, fmCreate); fileStream.WriteBuffer(PChar(str)^, Length(str) * SizeOf(Char)); except Result := false; end; finally - fileStream.Free; + try + fileStream.Free; + except + Result := false; + end; end; end;