Модераторы: Snowy, Alexeis, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> bmp палитра 
:(
    Опции темы
bagos
Дата 17.1.2011, 16:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

Репутация: нет
Всего: 1
всем привет, получаю картинку с экрана, затем распознаю в ней текст, проблема в том что часть символов не распознается если я сохраняю картинку в bmp файл а потом считываю программой для распознавания, а если через любой граф редактор сохранить и задать 1бит, то все нормально распознается, может дело в самой процедуре сохранения?
Код

var
  DC: HDC;
  x,y,x1, y1: integer;
  bmp_out: TBitmap;
  bmp: Graphics.TBitmap;
  img: TImage;
begin
  bmp := Graphics.TBitmap.Create;
  img := TImage.Create(nil);
  bmp_out := Graphics.TBitmap.Create;
  x1 := getwinrect(frmruletkahandle.rul_handle).left + n_x1;
  y1 := getwinrect(frmruletkahandle.rul_handle).Top + n_y1; ;
  bmp.Height := n_h;
  bmp.Width := n_w;
    bmp.PixelFormat := pf1bit;

  DC := GetDC(0);
  bitblt(bmp.Canvas.Handle, 0, 0, bmp.Width, bmp.Height, DC, x1, y1, SRCCOPY);
  ReleaseDC(0, DC);
      bmp.SaveToFile(GetCurrentDir +'\ScreenShot.bmp');

  bmp.Free;
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Звук, графика и видео"
Girder
Snowy
Alexeis

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делится вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • По вопросам разработки игр стоит заглянуть сюда

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Girder, Snowy.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Звук, графика и видео | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0600 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.