Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Низкоуровневое программирование > Win Api
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.05.2010, 08:13   #1
litvin44
Пользователь
 
Регистрация: 26.09.2009
Сообщений: 15
По умолчанию Как записать растр в файл? Как прочесть растр из файла?

Создаю "виртуальное" окно и растр в нем API-функциями
hBM = CreateCompatibleBitmap(hGetDC, W, H)
hDC = CreateCompatibleDC(0)
Q = SelectObject(hDC, hBM)

Потом рисую в этом окне. Как сохранить рисунок в файл?

И, наоборот, как прочесть в такое окно растр из файла?
litvin44 вне форума Ответить с цитированием
Старый 20.05.2010, 23:17   #2
litvin44
Пользователь
 
Регистрация: 26.09.2009
Сообщений: 15
По умолчанию

С чтением проблема снята:
Dim hDC As Long, Pic As IPictureDisp
Set Pic = LoadPicture(путь)
SelectObject hDC, Pic.Handle

Потом можно что-то нарисовать на hDC, и сохранить с помощью
SavePicture Pic, путь

Но, для того, что бы сохранить, сначала приходится прочесть файл с картиной нужных ширины и высоты.
А создать Pic "с нуля" не получается
litvin44 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как прочесть длинную строку из файла? delphyok Паскаль, Turbo Pascal, PascalABC.NET 1 13.05.2009 08:51
Как записать файл в файл программы? Хамяг Общие вопросы Delphi 2 02.11.2008 16:01
как записать record в файл Kn793 Общие вопросы Delphi 5 01.08.2008 08:10
Как прочесть два массива из файла Need_Help Паскаль, Turbo Pascal, PascalABC.NET 5 20.05.2007 16:40
Как прочесть txt файл www.site.ru/info.txt BR17UY Работа с сетью в Delphi 1 16.04.2007 13:01