ايران ويج

سلام كسي هست بدونه چطوري ميشه عكسي رو در فايل باينري ذخيره و بازيابي كرد

برنامه axe3 خیلی می تواند کمک کند یک فایلی را با این بر نامه باز کن (حتی عکس)و به بصورت باینری انرا مشاهده کرده
و در vb با استفاده استریم انرا پیاده کرد

ميشه بيشتر توضيح بدهيد ممنون ميشوم خيلي لازمش دارم

ببین دوست عزیز همه فایلها حتی عکسها در کامپیوتر بصورت باینری ذخیره می شوند
اگر بخواهی مثلا یک عکس با فرمت BMP را باز کنید باید خواندن فایل بصورت باینری باشد
[code] Dim SF As New System.IO.FileStream("e:\pic.bmp", FileMode.Open, FileAccess.Read, FileShare.Read)
Dim Bytee(100) As Byte

Bytee(0) = SF.ReadByte 'اولین بایت
Bytee(1) = SF.ReadByte 'دومین بایت
'الی اخر
SF.Close()

'ویا

Dim Lenghtt As Int32 = FileLen("e:\pic.bmp")

Dim Byte2(Lenghtt - 1)

Dim Myloop As Int32

Dim SF2 As New System.IO.FileStream("e:\pic.bmp", FileMode.Open, FileAccess.Read, FileShare.Read)


For Myloop = 0 To Lenghtt - 1
Byte2(Myloop) = SF2.ReadByte
Next
SF2.Close()
البته باید بخاطر داشته باشی
در اوایل فایل
بعضی از داده ها مربوط به سایز فایل طول وعرض عکس ونوع فایل ویکسری از خصوصیات دیگر فایل است
که نباید
دستکاری شود
یک روش دیگر باز کردن عکس روش گرافیکی است اگر خواستی برایت توضیح می دهم.