VPF::Получение имага со сканера - Форум программистов

alexht

Дата 1.8.2003, 13:26 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 3
Регистрация: 1.8.2003

Репутация: нет
Всего: нет

Работа с драйвером сканера.
Конечно, можно было бы вначале отсканировать, а затем: Файл -> Открыть изображение, но кому хочется работать в двух прогах вместо одной.

Step

Дата 1.8.2003, 14:20 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Экс. модератор
Сообщений: 5151
Регистрация: 26.9.2002
Где: дурдом.UA

Репутация: 5
Всего: 25

в примерах мсдн было что-то по работе с тваином, его юзай,
на пример наткнулся случайно.... так что сказать где именно его найти не могу

--------------------

- Дурак учится на своих ошибках, умный на чужих.
- умные учатся у дураков

Vyacheslav

Дата 4.8.2003, 09:11 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Экс. модератор
Сообщений: 2124
Регистрация: 25.3.2002
Где: Москва

Репутация: 9
Всего: 59

Скачиваешь для начала библиотеку EZTwain с открытым кодом с http://www.dosadi.com/pub/eztw1.zip и далее работаешь, вызывая функции из библиотеки. Вот для примера код из работающей программы:

Код


__fastcall TMainCertModule::TMainCertModule(TComponent* Owner)
    : TDataModule(Owner),
      m_ColorPrinterIndex(-1),
      m_BWPrinterIndex(-1)

{
   //инкапсулирована загрузка dll EZTwain
    m_EzTwDll = new TDll("EZTW32.dll");
    ReadPrinters();
}

void __fastcall TMainCertModule::ScanActionExecute(TObject *Sender)
{
  //в последующих четырех строчках кода инкапсулированы механизм получения 
  //адресов функций из dll    
  static TDllStdProc2<HANDLE, HWND, int> AcquireNative(*m_EzTwDll,"TWAIN_AcquireNative");
    static TDllStdProc1<HPALETTE,HANDLE> CreateDibPalette(*m_EzTwDll,"TWAIN_CreateDibPalette");
    static TDllStdProcV8<HDC, int, int, int, int,HANDLE, int, int> DrawDibToDC(*m_EzTwDll,"TWAIN_DrawDibToDC");
    static TDllStdProcV1<HANDLE> FreeNative(*m_EzTwDll,"TWAIN_FreeNative");
    if (HANDLE Handle = AcquireNative(MainForm->Handle,0))
    {
        try
        {
            Graphics::TBitmap* Bitmap =  PreviewForm->Image->Picture->Bitmap;
            PBITMAPINFOHEADER Info = (PBITMAPINFOHEADER)GlobalLock(Handle);
            PreviewForm->MWidth  = 1000 * Info->biWidth/Info->biXPelsPerMeter;
            PreviewForm->MHeight = 1000 * Info->biHeight/Info->biYPelsPerMeter;;
            Bitmap->Palette =  CreateDibPalette(Handle);
            Bitmap->Width  = Info->biWidth;
            Bitmap->Height = Info->biHeight;
            DrawDibToDC(Bitmap->Canvas->Handle,0,0,Bitmap->Width,Bitmap->Height,Handle,0,0);
        }
        __finally
        {
            FreeNative(Handle);
        }
        PreviewForm->ShowModal();
    }
}

PS.В примере, правда, используются темплейты для работы с dl и экпортируеммыми функциями, но это не принципиальноl. Если интересно, технология дана у меня в статье на сайте.

--------------------

С уважением, Вячеслав Ермолаев

Step

Дата 4.8.2003, 09:13 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Экс. модератор
Сообщений: 5151
Регистрация: 26.9.2002
Где: дурдом.UA

Репутация: 5
Всего: 25

Vyacheslav, может добавишь в примеры...

--------------------

- Дурак учится на своих ошибках, умный на чужих.
- умные учатся у дураков

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C/C++: Общие вопросы \| Следующая тема »