Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > C/C++ программирование > C++ Builder
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.06.2012, 14:52   #1
midiss
Пользователь
 
Регистрация: 08.12.2011
Сообщений: 24
По умолчанию обработка и преобразование изображения

на диске хранится файл с изображением в одном из графических форматов:jpeg, bmp. разработать приложение, которое:
1) позволяет открывать файл с изображением и выводить его на экран,
2) позволяет преобразовать изображение в черно-белое,
3) позволяет добавлять равномерный шум,
4) позволяет сохранить результат.

Код:
void __fastcall TForm1::Button1Click(TObject *Sender)
{ Graphics::TBitmap *Bitmap=new Graphics::TBitmap;
     Bitmap->LoadFromFile("H:\\777.bmp");
      Canvas->Draw(0,0,Bitmap);
delete Bitmap;

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{     Image2->Picture->Bitmap->PixelFormat = pf24bit;
  Image2->Picture->Bitmap->Width = Image1->Width;
  Image2->Picture->Bitmap->Height = Image1->Height;
  Image1->Perform(WM_PAINT, (WPARAM)Image2->Picture->Bitmap->Canvas->Handle, 0);
 
  for (int y = Image2->Picture->Bitmap->Height - 1; y >= 0; --y)
  {
    TRGBTriple* scanLine = (TRGBTriple*)Image2->Picture->Bitmap->ScanLine[y];
    for (int x = Image2->Picture->Bitmap->Width - 1;  x >= 0; --x)
    {
      const BYTE gray = 0.222 * scanLine[x].rgbtRed +
                        0.707 * scanLine[x].rgbtGreen +
                        0.071 * scanLine[x].rgbtBlue;
      scanLine[x].rgbtGreen = gray;
      scanLine[x].rgbtRed = gray;
      scanLine[x].rgbtBlue = gray;
    }
  }
}
что у меня не верно и как сделать последние 2 пункта
midiss вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Попиксельная обработка изображения shushlev Мультимедиа в Delphi 17 15.05.2013 20:27
Построение, преобразование и обработка матриц Tatyana Kur Помощь студентам 2 01.11.2011 01:30
Построение, преобразование и обработка матриц ICE1589 Паскаль, Turbo Pascal, PascalABC.NET 0 29.05.2011 11:55
Построение, преобразование и обработка матриц gessi Паскаль, Turbo Pascal, PascalABC.NET 2 13.09.2009 21:26
Обработка изображения Hollander Мультимедиа в Delphi 6 10.03.2008 14:21