浏览代码

Add New(format, filters) overload to TReadArchive

Ronny Otto 2 年之前
父节点
当前提交
42f625455d
共有 1 个文件被更改,包括 11 次插入0 次删除
  1. 11 0
      core.mod/core.bmx

+ 11 - 0
core.mod/core.bmx

@@ -193,6 +193,17 @@ Type TReadArchive Extends TArchive
 		archivePtr = bmx_libarchive_read_archive_new()
 	End Method
 
+	Rem
+	bbdoc: Creates a new instance of #TReadArchive with the specified format and filters.
+	End Rem
+	Method New(format:EArchiveFormat, filters:EArchiveFilter[])
+		New()
+		SetFormat(format)
+		For Local filter:EArchiveFilter = Eachin filters
+			AddFilter(filter)
+		Next
+	End Method
+
 	Rem
 	bbdoc: Registers a passphrase for the archive.
 	End Rem