|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
19.05.2010, 08:13 | #1 |
Пользователь
Регистрация: 26.09.2009
Сообщений: 15
|
Как записать растр в файл? Как прочесть растр из файла?
Создаю "виртуальное" окно и растр в нем API-функциями
hBM = CreateCompatibleBitmap(hGetDC, W, H) hDC = CreateCompatibleDC(0) Q = SelectObject(hDC, hBM) Потом рисую в этом окне. Как сохранить рисунок в файл? И, наоборот, как прочесть в такое окно растр из файла? |
20.05.2010, 23:17 | #2 |
Пользователь
Регистрация: 26.09.2009
Сообщений: 15
|
С чтением проблема снята:
Dim hDC As Long, Pic As IPictureDisp Set Pic = LoadPicture(путь) SelectObject hDC, Pic.Handle Потом можно что-то нарисовать на hDC, и сохранить с помощью SavePicture Pic, путь Но, для того, что бы сохранить, сначала приходится прочесть файл с картиной нужных ширины и высоты. А создать Pic "с нуля" не получается |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как прочесть длинную строку из файла? | 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 |