Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Преобразование цвета оттенки серого в черно-белый


vivaldi ©   (2011-10-11 09:05:00) 

Здравстуйте последняя проблема осталась у меня в программе.Сначала я сканирую лист в 256 оттенки серого,вырезаю часть фотографии.А остальную часть картинки мне нужно сохранить  в черно белом варианте.Какой функцией в Twain это можно реализовать?И куда мне ее вставить на примере моего кода.
begin
   if TWAIN_BeginMultipageFile('c:\Форма\file.tif')=0 then
  begin
             for i := 1 to 2 do
     begin
       StrFmt(pagefile, 'c:\image\%d.tif', [i]);
        hdib := TWAIN_LoadNativeFromFilename(pagefile);
        if hdib<>0 then
        begin
           TWAIN_DibWritePage(hdib);
           DIB_Free(hdib);
        end;
              if TWAIN_LastErrorCode()<>0 then
           break;
           end;
           end;
           TWAIN_EndMultipageFile()
  end;
 


vivaldi   (2011-10-11 09:50:00) [1]

Все разобрался сам

begin
hdib2:=DibConvertToPixelType(hdib,Twpt_bw)            
TWAIN_DibWritePage(hdib2);          
 DIB_Free(hdib2);      
  end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо