Использование класса Image и отображение рисунков

[areh]

Всем привет,

возникла у меня тут проблемма:

Есть некоторый файл, в котором "склеины" растровые файлы, т.е. просто побитово копировались несколько растров.

Так же есть файл, в котором содержиться информация, о том сколько растров в первом файле. Их расположение, т.е. смещение относительно начала файла и размер начального файла.

Дык вот я хотел узнать, есть ли возможность работать с этими растрами, т.е. без проблем можно прочитать массив байт, представляющий собой файл растра, но как его можно засунуть в Image или PictureBox?

подскажите пожалуйста, а то что-то никаких идей нету...

да, насчет возможности чтения растров из потока (stream) этот вариант, как мне кажеться не подходит, т.к. нет возможности читать произвольный файл...

ну вообщем надеюсь на ваши умные идеи по этому поводу...

[Kalan]

А нельзя распаковать все эти растры во временную директорию, поюзать оттуда, а конце удалить?

[areh]

Можно то можно, я то думал, вдруг есть способ правильней...

[Kalan]

Ну к сожалению способ правильнее мне на ум не приходит, но если хочешь спроси Гранджа - он все знает

[Nord777]

Возможно что это то, что тебе надо

Dim buffer() As Byte
Dim Im As System.Drawing.Image
Dim MS As System.IO.MemoryStream

'здесь заносишь в байтовый массив один из файлов растра
' buffer(x)=..... как это делать решать тебе

'далее создаешь из этого массива поток
MS = New System.IO.MemoryStream(buffer)

' а теперь из потока создаешь image
Im = System.Drawing.Image.FromStream(MS)

[areh]

К сожалению сейчас не могу проверить работоспособность того что ты предложил, т.к. нету под рукой VB

но если это работает, то безусловно, это именно то что мне нужно...

спасибо

[areh]

Спасибо Nord777, ты мне очень помог...

теперь у меня ещё один вопросик возник, как можно изменять размер изображения? т.е. уменьшать (масштабировать) его.

например, была картинка 200*100, как из неё сделать новую, 100*50

заранее спасибо...

[Nord777]

Можно сделать так:

Dim Im As Image
Dim Gr As Graphics
Dim DestRect As Rectangle

Im = Image.FromFile("D:\Мои Документы\FOTO\17.jpg")
DestRect = New Rectangle(0, 0, Im.Width, Im.Height)

Gr = PictureBox2.CreateGraphics
Gr.DrawImage(Im, PictureBox2.ClientRectangle, DestRect, GraphicsUnit.Pixel)

[Nord777]

Забыл комментарии
Какого бы размера не была картинка 17.jpg, обьект Graphics впихнет ее в размеры PictureBox2

И кстати посмотри описание на функцию GetThumbnailImage класса Image. Мне кажется в твоем случае она подойдет больше.
А вобще вариантов море

[areh]

очередное спасибо Nord777

тот пример, который ты написал, не совсем то, даже совсем не то, чего мне надо было, а вот функция GetThumbnailImage именно то, чего я хотел!

вообщем сенкс..