我在这里想要制作自己的LZSS算法(LZSS Is Compression算法)。但问题是速度。当我尝试压缩具有3 MB文件的文件时,过程是非常长的时间!
在那之后,我研究了什么可以做很长时间,我发现在检查每个字节时很长时间。 这是检查每个字节时的简单代码:
Dim fs As FileStream = New FileStream(ofd.FileName, FileMode.Open)
Dim buf(fs.Length - 1) As Byte
fs.Read(buf, 0, fs.Length)
Dim sise As Integer = fs.Length - 1
Dim temp2 As Integer = 0
Dim temp As Byte = 0
Dim temp3 As Byte = 0
For i = 0 To sise
temp = buf(i)
temp2 = i - 1
For j = 0 To temp2
If temp = buf(j) Then
End If
Next
Next
当我以27.3 KB的速度运行并打开文件并花费495毫秒时,如何打开文件20 MB并且需要几分钟甚至几小时。
那么,什么解决方案,这个简单的代码,但需要很多时间.. ??