ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Размер рисунка из файла. Не работает .ScaleWidth
14 сообщений из 14, страница 1 из 1
Размер рисунка из файла. Не работает .ScaleWidth
    #37133725
NikVik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NikVik
Гость
Добрый день!
Код:
Код: plaintext
1.
2.
3.
4.
5.
Public Sub РазмерИзФайла()

MsgBox LoadPicture("E:\Temp\i.bmp").Width
MsgBox LoadPicture("E:\Temp\i.bmp").ScaleWidth

End Sub
на строке с "ScaleWidth" даёт ошибку:
Object doesn't support this property or method (Error 438)
При этом строка с "Width" отрабатывает..
Почему??? Как заставить???
Спасибо.
...
Рейтинг: 0 / 0
24.02.2011, 14:22
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37133750
timtim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
timtim
Участник
NikVik,

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
LoadPicture([filename], [size], [colordepth],[x,y])
 
Функция служит для загрузки изображения в любой объект, поддерживающий свойство Picture.
 
Параметры

 
FileName
 Необязательный. Строковая переменная, определяющая имя загружаемого графического файла. Может включать имя папки и диска. Если не указано значение файла, то функция LoadPicture загружает пустой рисунок.
 
Size
 Необязательный. Тип Variant. Если FileName является курсором или значком файла, то параметр определяет желаемый размер изображения.
 
ColorDepth
 Необязательный. Тип Variant. Если FileName является курсором или значком файла, то параметр определяет желаемую глубину цвета.
 
X
 Необязательный. Параметр типа Variant. Обязателен, если указан параметр Y. Если FileName является курсором или значком файла, то параметр определяет желаемую ширину. В файле, содержащем множество отдельных изображений, в случае, если изображение заданного размера не доступно, используется наилучшее приближение. Значения X и Y используются, если установлено значение vbLPCustom аргумента ColorDepth. Для значков файлов наибольшее возможное значение  255 
 
Y
 Необязательный Параметр типа Variant. Обязателен, если указан параметр X. Если FileName является курсором или значком файла, то параметр определяет желаемую высоту. В файле, содержащем множество отдельных изображений, используется наилучшее приближение в случае, если изображение заданного размера не доступно. Для значков файлов наибольшее возможное значение  255 .
...
Рейтинг: 0 / 0
24.02.2011, 14:33
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37133781
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: timtim


Не, это ты расписал параметры функции, а ему нужно посмотреть свойства объекта Object BrowserClass IPictureDisp
Member of stdole, потому что она возвращает объект этого типа

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
24.02.2011, 14:46
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37134522
timtim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
timtim
Участник
NikVik,
Скажи, что у тебя возвращает:
Код: plaintext
MsgBox LoadPicture("E:\Temp\i.bmp").Width
...
Рейтинг: 0 / 0
24.02.2011, 20:03
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37134543
NikVik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NikVik
Гость
MsgBox LoadPicture("E:\\Temp\\i.bmp").Width возвращает - 3969.
Файл i.bmp для которого возвращается это число приложил.
Строка с ".Width" нормально отрабатывает, ошибка на ".ScaleWidth".
Собственно существует масса ссылок на коды, где работает сочетание LoadPicture и ScaleWidth,
напр /topic/586161&hl=loadpicture%20scalewidth
Но в моём случае почему то даёт ошибку.
...
Рейтинг: 0 / 0
24.02.2011, 20:15
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37134577
timtim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
timtim
Участник
NikVikСтрока с ".Width" нормально отрабатывает, ошибка на ".ScaleWidth".


Object BrowserClass IPictureDisp
Вкури.
...
Рейтинг: 0 / 0
24.02.2011, 20:38
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37134602
timtim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
timtim
Участник
NikVikMsgBox LoadPicture("E:\Temp\i.bmp").Width возвращает - 3969.
В каких едницах измерения?
...
Рейтинг: 0 / 0
24.02.2011, 21:00
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37134612
NikVik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NikVik
Гость
timtimNikVikMsgBox LoadPicture("E:\Temp\i.bmp").Width возвращает - 3969.
В каких едницах измерения?
Конечно в твипах.

timtimNikVikСтрока с ".Width" нормально отрабатывает, ошибка на ".ScaleWidth".


Object BrowserClass IPictureDisp
Вкури.
Так не вкуривается Class IPictureDisp... потому и написал...)
...
Рейтинг: 0 / 0
24.02.2011, 21:07
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37134638
timtim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
timtim
Участник
NikVikТак не вкуривается Class IPictureDisp... потому и написал...)
Присмотрись к IPictureDisp и подбери тару.
...
Рейтинг: 0 / 0
24.02.2011, 21:28
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37135194
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: NikVik
> Собственно существует масса ссылок на коды, где работает сочетание LoadPicture и ScaleWidth,
> напр /topic/586161&hl=loadpicture%20scalewidth

Если ты присмотришся повнимателней к коду по приведеной ссылке, то увидишь что с помощью функции LoadPicture загружают
рисунок в объект PictureBox. А вот там у рисунка есть свойства с приставкой Scale

> Но в моём случае почему то даёт ошибку.

Потому, что ты пытаешся прочитать несуществующие свойства. У класса IPictureDisp нет свойств с приставкой Scale. Поэтому
и ошибка.

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
25.02.2011, 10:59
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37135621
NikVik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NikVik
Гость
Поиск по "VBA не поддерживает PictureBox" дал множество результатов..)
Похоже причина именно в VBA?
...
Рейтинг: 0 / 0
25.02.2011, 12:48
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37135892
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Игорь Горбонос
Участник
> Автор: NikVik
> Поиск по "VBA не поддерживает PictureBox" дал множество результатов..)
> Похоже причина именно в VBA?


А при чем здесь VBA??? Ты нигде не указывал среду, приведенный тобою код одинаково работает как в VBA так и в VB6.
Ссылку, которую ты дал приводит к коду для VB6.

Тогда вернемся в начало - зачем тебе Scale - свойство?

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
25.02.2011, 14:28
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37136980
NikVik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NikVik
Гость
Scale - свойство нужно для получения размера рисунка из файла в пикселах (для последующей обработки графического файла).
...
Рейтинг: 0 / 0
25.02.2011, 22:12
| Ответить | Цитировать | Написать  
Размер рисунка из файла. Не работает .ScaleWidth
    #37137511
Фотография Бенедикт
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бенедикт
Участник
NikVikКонечно в твипах.Конечно, не в твипах, а в сотых долях миллиметра.
Далее здесь и по ссылкам оттуда, годится и для VB, и для VBA.
...
Рейтинг: 0 / 0
26.02.2011, 17:06
| Ответить | Цитировать | Написать  
14 сообщений из 14, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Размер рисунка из файла. Не работает .ScaleWidth
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/moderation_log.php?user_name=kalash-serg]:
 0ms
get settings:
 11ms
get forum list:
 16ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 38ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 55ms
get tp. blocked users:
 1ms
others: 438ms
total:  605ms
созд. / загр.: 605ms
x
x
Закрыть


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