Информация о BMP-картинке
Иногда бывает нужным получить размеры BMP-файла, перед тем как занести его в базу данных. У меня такая возможность понадобилась один раз в программе "учета" кадров: перед тем как занести фотографию работника в базу (это не только у америнканцев такие программы с фотографиями 😉 приходится проверять ее размеры, иначе кто-нибудь занесет "нужную" картинку, которая порешит всю форму. А больше я и не знаю зачем это нужно. Для этого используется небольшая функция bmpinfo. В принципе, там нет ничего сложного, но тем не менее. Перед тем как вызывать функцию нужно обязательно проинилизировать переменные: LNHeight (высота в пикселях), LNWidth (ширина в пикселях), LNColors (количество цветов ). Делается это командой:
Store 0 To LNHeight, LNWidth, LNColors.
Затем вызываете функцию, указав в качестве параметра имя BMP-файла: =BMPInfo("Drive:DirFileName.bmp")
Теперь значения высоты, ширины и количества цветов находятся в соответсвующих переменных.
Автор публикации
Вложенные файлы
# |
Название |
Тип файла |
Размер |
|---|---|---|---|
| 1 | bmpinfo | .zip | 30,65 КБ |