ReSQL.ru
     
powered by simpleCommunicator - 2.0.18     © 2024 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Map
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Загрузка картинки из таблицы в контрол (пример)
10 сообщений из 10, страница 1 из 1
Загрузка картинки из таблицы в контрол (пример)
    #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:19
| Ответить | Цитировать | Написать | Ответы  
Загрузка картинки из таблицы в контрол (пример)
    #39789483
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sdku
Участник
iKaRus,
и чо?...
...
Рейтинг: 0 / 0
21.03.2019, 11:49
| Ответить | Цитировать | Написать  
Загрузка картинки из таблицы в контрол (пример)
    #39789491
iKaRus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
iKaRus
Гость
sdku, все то же - надо - пользуйтесь, интересно - смотрите, разбирайте, развивайте, переделывайте под себя. Нет - ну нет, так нет..
за время работы над этим вопросом там много интересного было написано может что найдете интересным для себя, а где и мне подскажете - тоже в строку.
тема на около Access'овских форумах всплывает регулярно, здесь собрал воедино все работающие решения которые мне попадались и привел их в максимально удобный для реальной работы вид.
зачем это нужно? в основном интерфейсные решения средствами Access ну и для понимания.
...
Рейтинг: 0 / 0
21.03.2019, 12:01
| Ответить | Цитировать | Написать  
Загрузка картинки из таблицы в контрол (пример)
    #39791342
iKaRus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
iKaRus
Гость
Выглядит так:

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

Можете еще раз выложить проект с примерами?
...
Рейтинг: 0 / 0
07.06.2019, 07:35
| Ответить | Цитировать | Написать  
Загрузка картинки из таблицы в контрол (пример)
    #39823860
iKaRus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
iKaRus
Гость
Swa111, к сожалению rusimport в дауне, а здесь ограничение 150Kb - не влажу
т-что опять на zippy: https://www35.zippyshare.com/v/WGZfXSQy/file.html
...
Рейтинг: 0 / 0
07.06.2019, 09:19
| Ответить | Цитировать | Написать | Ответы  
Период между сообщениями больше года.
Загрузка картинки из таблицы в контрол (пример)
    #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
Нравится: Панург
16.03.2024, 10:56
| Ответить | Цитировать | Написать  
Загрузка картинки из таблицы в контрол (пример)
    #40138511
iKaRus
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
iKaRus
Участник
Чтобы не постить новые ссылки на каждое изменение
перевыложил на Git: https://github.com/iKaRus-VLZ/Pictures
...
Рейтинг: 2 / 0
Нравится: ma1tus, Панург
18.03.2024, 21:53
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Загрузка картинки из таблицы в контрол (пример)
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (1): Анонимы (1)
Читали форум (2): Анонимы (1), Yandex Bot 2 мин.
Пользователи онлайн (7): Анонимы (6), Yandex Bot 2 мин.
Польз. соглашение
NoSQL.ru, Чат Кролика       Пашэ: Рисунки, Чат       Фотоальбом: Участники, Встречи
Закрыть
Start [/forum/topic.php?fid=45&tid=1610662&gotolast=1]:
 0ms
get settings:
 1ms
get forum list:
 6ms
check forum access:
 1ms
check topic access:
 1ms
track hit:
 22ms
get topic data:
 2ms
get forum data:
 0ms
get page messages:
 12ms
update_topic_read_status (1610662): 18.03.2024 21:53:39:
 0ms
get tp. blocked users:
 0ms
get online users:
 30ms
check new:
 1ms
others: 77ms
total:  153ms
созд. / загр.: 153ms (нв.: 1ms)
x
x
Закрыть


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