Преобразование Массива Байт в Picture

[Zaratustra]

Такой вопрос:
У меня есть массив байт, содержащий RGB и НЕ содержащий никаких заголовков и т.п.
Нужно показать его на форме, скажем в PictureBox или Image.
Размеры картинки мне известны, цвета - gray scale.

[alibek]

Так RGB или Grayscale?
Если структура массива соответствует BMP, то есть SetDIBits.

[Zaratustra]

Видимо все же RGB, причем 256 цветовой, но не уверен...
В массиве только цвета, больше ничего, никаких заголовков и т.п..

[Antonariy]

256 это не RGB. Это 256.

[Zaratustra]

Сорри, торможу.
Так что делать-то? Массив байтов цветов, приводим к картинке, как?

[Antonariy]

1) Сколькими байтами закодирован цвет?
2) Известен ли размер картинки?
3) Откуда вообще взялся этот массив?

[Zaratustra]

1) одним байтом
2) известен
3) не скажу

[Antonariy]

Код: Выделить всё

If Высота * Ширина <> UBound(mas) + 1 And LBound(mas) = 0 then
    MsgBox "Все это чушь собачья, ответ на третий вопрос мог бы просянить ситуацию."
else
    Form.ScaleMode=vbPixels
    Form.AutoRedraw=True
    For y=0 To Высота
        For x=0 To Ширина
             Form.Pset (x + 1, y + 1),  mas((x + 1) * y + x)
        Next
    Next
End If

[Zaratustra]

Именно так я сначала и сделал, но появилась следующая проблема: картинка имеет размерность 256*400, а для устойчивого изображения на форме его нужно постоянно перерисовывать (иначе теряется при перекрытии другими формами и т.п.). Соответственно имеем сильно раздражающее блымание картинки и тормоза в проге...
Может какие "быстрые" методы есть, АПИ и т.п.?

P.S. На третий вопрос: из длл"ки, которая читает картинку с хитрого девайса и возвращает ее в виде массива цветов пикселов. Правда, не могу понять как эта инфа может помочь...

[Antonariy]

Form.AutoRedraw=True предназначено как раз для того, чтобы картинку не нужно было постоянно перерисовывать.

[Zaratustra]

О! Дело!
СПА-СИ-БО!

[Хакер]

Честно говоря способ с циклами и псетом отвратителен.

[Zenitchik]

Работает - и черт с ним.

[Хакер]

Дизреспект.

[Antonariy]

Честно говоря способ с циклами и псетом отвратителен.

Предложи альтернативу.

[Хакер]

alibek уже предложил.

[ВикторZX]

юзай SetDiBitSToDevice - в чем проблема?!!

[Хакер]

ВикторZX
Может не надо повторять то, что уже сказано два раза подряд?