Картинка в ресурсфайле

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Гость
 

Картинка в ресурсфайле

Сообщение Гость » 26.04.2004 (Пн) 21:23

Картинка, но не БМП, поэтому она в разделе КУСТОМ. Как её загрузить в пикчабокс?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 27.04.2004 (Вт) 9:33

С наименьшим гемором - через сохранение на хард.
С наибольшим - через написание собственного конвертора в BMP.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Шурик
Самогонщик
Самогонщик
Аватара пользователя
 
Сообщения: 1657
Зарегистрирован: 30.06.2003 (Пн) 13:27
Откуда: из запоя :))))) Матных сообщений: 972

Сообщение Шурик » 27.04.2004 (Вт) 11:25

Открывай его как Custom, а потом обрабатывай ее, но при этом нужно знать формат твоего файла..... а что за файл?????

Гость
 

Сообщение Гость » 27.04.2004 (Вт) 18:26

Формат ЖПГ.
А как на хард сохранить?

A.A.Z.
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
 
Сообщения: 3035
Зарегистрирован: 30.06.2003 (Пн) 13:38

Сообщение A.A.Z. » 27.04.2004 (Вт) 19:56

Код: Выделить всё
Private Sub Command1_Click()
Dim B() As Byte
B = LoadResData(101, "CUSTOM")
Open "C:\bbbbb.jpg" For Binary Access Write As #1
Put #1, , B()
Close #1
End Sub
Нет меня больше


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 30

    TopList