Скопировать графический файл в буфер, как изображение

Программирование на Visual Basic for Applications
dormouse
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 140
Зарегистрирован: 10.01.2007 (Ср) 21:58
Откуда: Волжский

Скопировать графический файл в буфер, как изображение

Сообщение dormouse » 20.02.2009 (Пт) 9:38

в MSAccess-базе есть некий каталог изображений, которые хранятся на диске в jpg-файлах. в базе хранятся только пути к этим файлам. Нет проблем с отображением этих картинок в объекте "Рисунок". Но появилась необходимость передавать текущую картинку в буфер обмена для последующей вставки, например, в ворд. я пересмотрел огромное количество примеров работы с буфером, графикой, хранением изображений в базе.. но так рабочего алгоритма и не подобрал :(

как я пробовал делать: на форме поместил Свободную рамку объекта.

Код: Выделить всё
    OLE1.Class = "Pbrush"
    OLE1.OLETypeAllowed = acOLEEmbedded
    OLE1.Action = OLE_CREATE_FROM_FILE
    OLE1.SourceDoc = strFilePath
...
    OLE1.SetFocus
    DoCmd.RunCommand acCmdCopy

В итоге получается, что в рамку вставляется иконка файла, хотя свойство Тип вывода = Содержимое. А класс автоматически сменяется на "HTML Document" :? В некоторых случаях - "Package". И отображать картинку отказывается

меня вполне устроила бы какая-нибудь API-функция без использования OLE и форм..
VBA, MSA97

Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 61

    TopList  
cron