Гость
Войти | Профиль | Очистить
Map
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Загрузка картинки из таблицы в контрол (пример) / 10 сообщений из 10, страница 1 из 1
21.03.2019, 11:19
    #39789459
iKaRus
iKaRus
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Загрузка картинки из таблицы в контрол (пример)
Собственно сабж.
Используется слегка модифицированный класс c32bppDIB By LaVolpe (from psc cd) http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=67466&lngWId=1
с некоторыми доработками под Access.
преобразование в EMF по методу Бенедикт https://www.sql.ru/forum/348182-a/primer-jpeg-gif-iz-long-binary-polya-v-image-bez-kopirovaniya-vo-vremennyy-fayl?hl=createenhmetafile
плюс немного творчества от себя для упрощения работы со всем этим.
корявости в коде много, но вполне юзабельно.

Пример содержит форму демонстрирующую возможности:
загрузка/выгрузка файла изображения в таблицу для последующего использования,
вывод данных из таблицы на контролы типа Access.CommandButton и Access.Image
и некоторые дополнительные возможности последующей работы с загруженным изображением (добавление текста, повороты, т.п.)
поддерживает альфаканал, PNG и ICO файлы

приложить файл не удалось из-за размера (0.78 MB - пример содержит картинки)
выложил здесь: https://www63.zippyshare.com/v/JClsKWKR/file.html
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать | Ответы  
21.03.2019, 11:49
    #39789483
sdku
sdku
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Загрузка картинки из таблицы в контрол (пример)
iKaRus,
и чо?...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.03.2019, 12:01
    #39789491
iKaRus
iKaRus
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Загрузка картинки из таблицы в контрол (пример)
sdku, все то же - надо - пользуйтесь, интересно - смотрите, разбирайте, развивайте, переделывайте под себя. Нет - ну нет, так нет..
за время работы над этим вопросом там много интересного было написано может что найдете интересным для себя, а где и мне подскажете - тоже в строку.
тема на около Access'овских форумах всплывает регулярно, здесь собрал воедино все работающие решения которые мне попадались и привел их в максимально удобный для реальной работы вид.
зачем это нужно? в основном интерфейсные решения средствами Access ну и для понимания.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.03.2019, 10:44
    #39791342
iKaRus
iKaRus
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Загрузка картинки из таблицы в контрол (пример)
Выглядит так:

Пример запускается с формы Test_Pictures
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.03.2019, 12:57
    #39791442
iKaRus
iKaRus
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Загрузка картинки из таблицы в контрол (пример)
Перевыложил на rusimport: http://am.rusimport.ru/MSAccess/download.aspx?id=838
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.06.2019, 14:10
    #39823458
iKaRus
iKaRus
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Загрузка картинки из таблицы в контрол (пример)
изменения в модуле modObjectData - исправлена ошибка позиционирования текста при отсутствии изображения
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.06.2019, 07:35
    #39823834
Swa111
Swa111
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Загрузка картинки из таблицы в контрол (пример)
iKaRus,

Можете еще раз выложить проект с примерами?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.06.2019, 09:19
    #39823860
iKaRus
iKaRus
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Загрузка картинки из таблицы в контрол (пример)
Swa111, к сожалению rusimport в дауне, а здесь ограничение 150Kb - не влажу
т-что опять на zippy: https://www35.zippyshare.com/v/WGZfXSQy/file.html
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать | Ответы  
Период между сообщениями больше года.
16.03.2024, 10:56
    #40138504
iKaRus
iKaRus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Загрузка картинки из таблицы в контрол (пример)
Обновил http://am.rusimport.ru/MSAccess/topic.aspx?id=838

Ссылка https://mega.nz/file/0cJ2UAhI#5ydz7_Lm_eXOkrhOdrxl5LT48FoIz4W0Rlym8mHM5Ac
Переделан под FreeImage
Работает в Access 2003+ (x86/x64)
Используются библиотеки FreeImage и слегка модифицированный модуль Visual Basic Wrapper for FreeImage 3 by Carsten Klein (cklein05@users.sourceforge.net) взятый с https://freeimage.sourceforge.io/download.html
Для работы требуется наличие библиотек FreeImage соответствующей разрядности.
По умолчанию ищет их в подпапке \INC\ рабочей папки примера

Архив Pictures.7z содержит:
PicturesFI.mdb - база Access содержащая все примеры
Pictures_Model.xml - модель объясняющая, как рассчитывается позиция текста рядом с картинкой.
\INC\ - папка содержащая библиотеки FreeImage x86/x64

Запускается с формы: ~RunMe.
Картинка
Содержит формы:
Test_PictureData_SetToControl - Пример работы с картинками
Картинка
Test_OlePictContinuos - Вывод картинок в ленточную форму
Картинка
Test_OlePictDIBContinuos - Вывод картинок встроенных в Access в ленточную форму
Картинка
Sample_Clock - Аналоговые часы
Картинка
Sample_Dates - Вывод изображений в плавающие кнопки и контекстное меню
Картинка
Модуль и классы для работы с изображениями:
modPictureData - содержит функции (основные):
PictureData_SetToControl - загружает картинку в нужное свойство указанного контрола
modFreeImage - собственно модифицированный модуль Visual Basic Wrapper for FreeImage 3 by Carsten Klein (cklein05@users.sourceforge.net)
...
Рейтинг: 1 / 0
Нравится: Панург
| Ответить | Цитировать | Написать  
18.03.2024, 21:53
    #40138511
iKaRus
iKaRus
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Загрузка картинки из таблицы в контрол (пример)
Чтобы не постить новые ссылки на каждое изменение
перевыложил на Git: https://github.com/iKaRus-VLZ/Pictures
...
Рейтинг: 2 / 0
Нравится: ma1tus, Панург
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Загрузка картинки из таблицы в контрол (пример) / 10 сообщений из 10, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 613ms
Закрыть
start [/forum/topic.php?fid=45&tablet=1&tid=1610662]:
 0ms
get settings:
 14ms
get forum list:
 7ms
check forum access:
 1ms
check topic access:
 1ms
track hit:
 47ms
get topic data:
 5ms
get forum data:
 1ms
get page messages:
 218ms
get tp. blocked users:
 1ms
others: 318ms
total:  613ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]