LoadPicture
Функция LoadPicture
LoadPicture([FileName], [Size], [ColorDepth],[X,Y])
Используя свойство Picture, функция загружает графическое изображение в форму или элементы управления PictureBox и Image. Visual Basic различает следующие форматы графических файлов: растровые файлы (.bmp), значки (.ico), файлы (.rle) с групповым кодированием(run-length encoded), метафайлы (.wmf), улучшенные метафайлы (.emf), файлы типа GIF (.gif) и JPEG (.jpg) 
Параметры
| FileName | 
Необязательный параметр. Строковая переменная, определяющая имя загружаемого графического файла. Может включать имя папки и диска. Если не указано значение файла, то функция LoadPicture очищает элементы управления Image или PictureBox | 
| Size | 
Необязательный параметр типа Variant. Если FileName является курсором или значком файла, то параметр определяет желаемый размер изображения. Допустимые значения приведены в таблице установок | 
 
| ColorDepth | 
Необязательный параметр типа Variant. Если FileName является курсором или значком файла, то параметр определяет желаемую глубину цвета. Допустимые значения приведены в таблице установок  | 
 
| X | 
Необязательный параметр типа Variant. Обязателен, если указан параметр Y. Если FileName является курсором или значком файла, то параметр определяет желаемую ширину. В файле, содержащем множество отдельных изображений, в случае, если изображение заданного размера не доступно, используется наилучшее приближение. Значения X и Y используются, если установлено значение vbLPCustom аргумента ColorDepth. Для значков файлов наибольшее возможное значение 255 | 
 
| Y | 
Необязательный параметр типа Variant. Обязателен,если указан параметр X.Если FileName является курсором или значком файла, то параметр определяет желаемую высоту. В файле, содержащем множество отдельных изображений, используется наилучшее приближение в случае, если изображение заданного размера не доступно. Для значков файлов наибольшее возможное значение 255 | 
 
  
Установки
Установки для части Size приведены в таблице
 
| Константа | 
Значение | 
Описание | 
 
| vbLPSmall | 
0 | 
Системный значок малого размера | 
 
| vbLPLarge | 
1 | 
Системный значок большого размера, определяемого видеодрайвером | 
 
| vbLPSmallShell | 
2 | 
Значок малого размера для оболочки. Размер определяется установками кнопок Заголовок на вкладке Оформление диалогового окна Экран Панели управления | 
 
| vbLPLargeShell | 
3 | 
Значок большого размера для оболочки. Размер определяется установками кнопок Заголовок на вкладке Оформление диалогового окна Экран Панели управления | 
 
| vbLPCustom | 
4 | 
Определяемый размер, задается аргументами X и Y | 
  
Установки для части ColorDepth приведены в таблице
 
| Константа | 
Значение | 
Описание | 
 
| vbLPDefault | 
0 | 
Оптимальное значение при использовании определенных файлов | 
 
| vbLPMonochrome | 
1 | 
2 цвета | 
 
| vbLPVGAColor | 
2 | 
16 цветов | 
 
| vbLPColor | 
3 | 
256 цветов | 
  
Чтобы загрузить графическое изображение в элементы управления PictureBox и Image или же использовать его в качестве фона формы, следует присвоить возвращаемое значение функции LoadPicture значению свойства Picture данных элементов. Например: 
Set Picture = LoadPicture("PARTY.BMP")
Set Picture1.Picture = LoadPicture("PARTY.BMP")
 
Чтобы прикрепить к форме значок, приравняйте значение свойства Icon данной формы значению, возвращаемому функцией LoadPicture: 
Set Form1.Icon = LoadPicture("MYICON.ICO")
 
Значки могут быть присвоены для свойства DragIcon любого элемента управления, за исключением элементов управления Timer и Menu. Например: 
Set Command1.DragIcon = LoadPicture("MYICON.ICO")
 
С помощью функции LoadPicture можно загрузить графический файл в системный Буфер обмена: 
Clipboard.SetData LoadPicture("PARTY.BMP")
 
Категория 
Функции загрузки данных
 |