[محمديات]

1- بالنسبه لل crc وجدت برنامج يقوم بعمله بالطريقة الصحيحه ويكتب ال crc المناسب للملف والملف يعمل بطريقه صحيحه انا رفعت البرنامج لمعرفة نوع ال crc او الطريقة التي يتبعها في حساب ال crc او على الأقل طريقة دمجه داخل برنامجي ليعمل في الخلفية ويعدل ال crc

2- عندي مشكله عند البحث بالهكس عن مجموعة بايت بجوار بعضهم اريد ان اظهر كل قيمة منهم في صندوق فيظهرون عندي بصيغة الأرقام ولا يظهرون بصيغة الهيكس وانا اريدهم يظهرون بصيغة الهيكس والكود المستخدم

كود :

Dim Buffer(MyFileStream.Length - 1) As Byte
            Dim Find As Byte() = {&H46, &H3, &HFF, &HF}
            MyFileStream.Read(Buffer, 0, Buffer.Length)
            If IsArraysEqual(Find, {&H46, &H3, &HFF, &HF}) Then
                Dim Index As Integer = 0
                Do
                    Index = SearchByteArray(Buffer, Find, Index)

                    If Index <> -1 Then

                        TextBox2.Text = Buffer(Index + 0)
                        TextBox3.Text = Buffer(Index + 1)
                        TextBox4.Text = Buffer(Index + 3) & Buffer(Index + 2)

                    End If
                Loop Until Index = -1

هذا ناتج الكود



ولكن من الفترض او المطلوب انه يظهر القيم الحقيقة مثل


ومكانهم بالملف الهيكس



مع العلم اني استخدمة خاصية البحث اللي حضرتك شرحتها علشان اعرف مكانه على ال buffer
ولكن ما الحل لأنه في النهاية المظهر اللي من المفترض ان يخرج



مع امكانية عمل swap بالضغط على زر وليكن مثلا لنقل مربع ازرق مكان مربع ازرق اخر في نفس الملف

واسف اني اطلت عليك اخي الحبيب والمحبوب

Motaz Alnuweiri