Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.01.07;
Скачать: [xml.tar.bz2];

Вниз

Подскажите   Найти похожие ветки 

 
hgd   (2006-12-14 15:37) [0]

У меня есть одно SDK, которое позволяет работать с видеокамерой. Так вот, на форме есть комопнент, который позволяет хватать изображение с нее. Так вот, есть функция

GetBMP vImage, vSize

В которой:

Parameters

vImage
Required. A variant containing the bitmap data.
vSize
Required. A variant containing the size of the returned bitmap data.

В help приведен код на VB 6.0

Example
In this example a bitmap is captured with the GetBMP method and saved to a file.
Visual Basic 6.0:

Dim b As Variant
Dim Size As Variant
Dim a() As Byte

Call CamImage.GetBMP(b, Size)

a() = b
Open "C:\Test.bmp" Fore Binary Access Write As #1

Put #1, , a()
Close #1

Как это реализовать в Delphi?


 
Eraser ©   (2006-12-14 15:41) [1]

> [0] hgd   (14.12.06 15:37)

в SDK библиотека поддерживает только VB? не верю.


 
hgd   (2006-12-14 15:47) [2]

Да нет, пример есть только на VB.


 
Сергей М. ©   (2006-12-14 15:56) [3]

Как в VB-примере объявлена переменная CamImage ?


 
Sapersky   (2006-12-14 16:40) [4]

Да нет, пример есть только на VB.

Тоже не верю. Наверняка на С(++) есть.


 
hgd   (2006-12-15 21:41) [5]

Вот

procedure GetBMP(var vImage: OleVariant; var vSize: OleVariant);



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.01.07;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.011 c
15-1166363019
Nic (from home)
2006-12-17 16:43
2007.01.07
Супер компьютер "Скиф"


15-1166344583
Gydvin
2006-12-17 11:36
2007.01.07
Вопрос по JavaScript


4-1156689426
FUH
2006-08-27 18:37
2007.01.07
Извлечь таблицу из MSI-инсталлятора


15-1166472099
PHPDeveloper
2006-12-18 23:01
2007.01.07
закачка файла


15-1166307827
default
2006-12-17 01:23
2007.01.07
Запись песен звучащих с интернет-радио к себе на диск





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский