VB6, GDI+, пара вопросов.

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Mikle
Изобретатель велосипедов
Изобретатель велосипедов
Аватара пользователя
 
Сообщения: 4148
Зарегистрирован: 25.03.2003 (Вт) 14:02
Откуда: Туапсе

VB6, GDI+, пара вопросов.

Сообщение Mikle » 31.03.2009 (Вт) 18:05

Задача:
1. Загружать картинки из файлов, совместимых с GDI+, в битмап.
2. Переносить данные в массив.
3. Обрабатывать данные.
4. Загонять в битмап обратно.
5. Сохранять средствами GDI+.

1, 3 и 4 пункты сделал.

Не пойму, что делать с п.2 (Переносить данные из битмапа в массив). Хотелось бы без создания дополнительных объектов, типа Graphics, особенно если они будут требовать hDC для привязки.

П.5 работает только в формате Jpeg, нарыл здесь на форуме пример и модуль с полным описанием ф-ций GDI+, но пример и модуль не соответствуют :roll: , например строка, описывающая формат не совпадает, например для Jpeg в примере такая строка:
{557CF401-1A04-11D3-9A73-0000F81EF32E}
А в модуле такая:
{B96B3CAE-0728-11D3-9D7B-0000F81EF32E}
Та, что в примере, работает, но там нет строк для других форматов, кроме Jpeg, те строки, что в модуле, не работают.

Вот пример, загружающий картинку из одного файла, и сохраняющий в другой, если снять ремарки и заремить строки:
Код: Выделить всё
FileName = "in.bmp"
Res = GdipCreateBitmapFromFile(StrPtr(FileName), Bmp)

то будет генерироваться случайный шум, переноситься в битмап и сохраняться в Jpeg формате.
Вложения
Test.rar
(71.59 Кб) Скачиваний: 45

karlex
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 138
Зарегистрирован: 30.03.2009 (Пн) 20:25
Откуда: Пермский край, г.Кунгур

Re: VB6, GDI+, пара вопросов.

Сообщение karlex » 31.03.2009 (Вт) 19:16

Mikle писал(а):Не пойму, что делать с п.2 (Переносить данные из битмапа в массив).

GdipBitmapLockBits
CopyMemory
GdipBitmapUnlockBits

На счет сохранения:
Listing Installed Encoders
Все гениальное — просто!
-------------------------------------
Кто ищет — тот всегда найдет!
-------------------------------------
Лень — двигатель прогресса.
Прогресс — двигатель лени.

Andrey Fedorov
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
 
Сообщения: 3287
Зарегистрирован: 21.05.2004 (Пт) 9:28
Откуда: Москва

Re: VB6, GDI+, пара вопросов.

Сообщение Andrey Fedorov » 31.03.2009 (Вт) 22:56

Фиг Вам! - Сказал Чебурашка, обгладывая Крокодила Гену...

Mikle
Изобретатель велосипедов
Изобретатель велосипедов
Аватара пользователя
 
Сообщения: 4148
Зарегистрирован: 25.03.2003 (Вт) 14:02
Откуда: Туапсе

Re: VB6, GDI+, пара вопросов.

Сообщение Mikle » 01.04.2009 (Ср) 10:49

karlex писал(а):GdipBitmapLockBits
CopyMemory
GdipBitmapUnlockBits

Загвоздка в получении PixelFormat, который нужен для GdipBitmapLockBits.
Andrey Fedorov писал(а):Можно здесь посмотреть.
Можно здесь посмотреть.

Спасибо, разбираюсь.

karlex
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 138
Зарегистрирован: 30.03.2009 (Пн) 20:25
Откуда: Пермский край, г.Кунгур

Re: VB6, GDI+, пара вопросов.

Сообщение karlex » 01.04.2009 (Ср) 11:09

Mikle писал(а):Загвоздка в получении PixelFormat, который нужен для GdipBitmapLockBits.

Без проблем: GdipGetImagePixelFormat

Вообще советую: GDI+ Flat API
Все гениальное — просто!
-------------------------------------
Кто ищет — тот всегда найдет!
-------------------------------------
Лень — двигатель прогресса.
Прогресс — двигатель лени.

Mikle
Изобретатель велосипедов
Изобретатель велосипедов
Аватара пользователя
 
Сообщения: 4148
Зарегистрирован: 25.03.2003 (Вт) 14:02
Откуда: Туапсе

Re: VB6, GDI+, пара вопросов.

Сообщение Mikle » 01.04.2009 (Ср) 17:38

karlex
Как я сам не заметил :roll:
Andrey Fedorov
Там по ссылке идет речь еще о какой-то полноценной оберте Темыча, в кирпичах такого не нашел, кто скажет, о чем речь?


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

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

Сейчас этот форум просматривают: SemrushBot и гости: 33

    TopList  
cron