а на кой? там в библиотеке компонентов есть элемент, не помню как называется, но в названии фигурирует что-то вроде "InventorView"... вытащить его на свою форму и заставить отображать эти превьюшки... там код, по-моему, примитивный...
Пост N: 173
Откуда: Россия, Новосибирск
Рейтинг:
2
Отправлено: 06.07.06 10:56. Заголовок: Re:
brigval пишет:
цитата:
Возможно ли программно вытащить превьюшки из файлов
Public oUnkNoumnDoc As Inventor.Document Set oUnkNoumnDoc = ThisApplication.Documents.Open(sPathName, False) 'Image1 это обьект Image Image1.Picture = oUnkNoumnDoc.Thumbnail
Пост N: 194
Откуда: Россия, Ногинск Московской обл
Рейтинг:
0
Фото:
Отправлено: 06.07.06 11:41. Заголовок: Re:
Витек пишет:
цитата:
Public oUnkNoumnDoc As Inventor.Document Set oUnkNoumnDoc = ThisApplication.Documents.Open(sPathName, False) 'Image1 это обьект Image Image1.Picture = oUnkNoumnDoc.Thumbnail
oUnkNoumnDoc создается но пока выдает oUnkNoumnDoc.Thumbnail="Automation Error"
Пост N: 195
Откуда: Россия, Ногинск Московской обл
Рейтинг:
0
Фото:
Отправлено: 06.07.06 11:43. Заголовок: Re:
Витек пишет:
цитата:
Public oUnkNoumnDoc As Inventor.Document Set oUnkNoumnDoc = ThisApplication.Documents.Open(sPathName, False) 'Image1 это обьект Image Image1.Picture = oUnkNoumnDoc.Thumbnail
Пост N: 176
Откуда: Россия, Новосибирск
Рейтинг:
2
Отправлено: 07.07.06 07:43. Заголовок: Re:
Отлично, скорей всего оттуда я и подчерпнул информацию.Всго не упомнишь.А про регистрацию я и забыл подсказать.У меня прога при установки сама регистрирует эту dll. Всего хорошего.
Пост N: 178
Откуда: Россия, Новосибирск
Рейтинг:
2
Отправлено: 12.07.06 08:02. Заголовок: Re:
brigval пишет:
цитата:
В принципе, это возможно?
Все возможно в нашем мире. Dim oThumbnail As IPictureDisp Set oThumbnail = oUnkNoumnDoc.Thumbnail Image1.Picture = oThumbnail
SavePicture oThumbnail, "c:\Обмен\tt.bmp" Строка "c:\Обмен\tt.bmp" как пример имени файла для спасения превьюшки. SavePicture функция класса библиотеки stdole ( C:\WINXP\System32\STDOLE2.TLB - OLE Automation)
Все даты в формате GMT
3 час. Хитов сегодня: 2
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация вкл, правка нет