![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 26.09.2009
Сообщений: 15
|
![]()
Создаю "виртуальное" окно и растр в нем API-функциями
hBM = CreateCompatibleBitmap(hGetDC, W, H) hDC = CreateCompatibleDC(0) Q = SelectObject(hDC, hBM) Потом рисую в этом окне. Как сохранить рисунок в файл? И, наоборот, как прочесть в такое окно растр из файла? |
![]() |
![]() |
![]() |
#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 |