Форум программистов, компьютерный форум CyberForum.ru

Энтропия изображения - C++

Восстановить пароль Регистрация
 
MishkaSh
0 / 0 / 0
Регистрация: 19.02.2013
Сообщений: 127
18.04.2014, 15:23     Энтропия изображения #1
Народ помогите дописать программу чтобы она считала энтропию изображения. Программа написана в 6 билдере, вот код:
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
#include <vcl.h>
#pragma hdrstop
#include <math.h>
#include <Math.hpp>
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
Graphics::TBitmap *Bitmap = new Graphics::TBitmap();
Graphics::TBitmap *Bitmap1 = new Graphics::TBitmap();
int W, H, R, B, G, j, i, r, n, q;
int L[256];
int x[1500][1500];
int **Y;
int gl[257];
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
   OpenPictureDialog1->DefaultExt = "BMP";
   OpenPictureDialog1->FileName = "*.bmp";
   OpenPictureDialog1->InitialDir = "";
if (OpenPictureDialog1->Execute())
    Image1->Picture->LoadFromFile(OpenPictureDialog1->FileName);
    Image2->Picture->LoadFromFile(OpenPictureDialog1->FileName);
    Image1->Stretch=true;
    Bitmap->Assign(Image1->Picture);
    W=Image2->Width;
    H=Image2->Height;
    for(i=0; i<257; i++)
    L[i] = 0;
    for(i=0; i<=255; i++)
gl[i]=i;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
{
int R,G,B;
BYTE* biImage;
Y=new int*[H]; for(j=0; j<H; j++) Y[j]=new int[W];
//преобразование RGB в YUV
for(i=0; i<H; i++)
{
biImage=(BYTE*)(Form1->Image1)->Picture->Bitmap->ScanLine[i];
for(j=0; j<W; j++)
 {
R=biImage[j*3+2]; G=biImage[j*3+1]; B=biImage[j*3];
Y[i][j] = 0.299 * R + 0.587 * G + 0.114 * B;
x[i][j] = Y[i][j];
//Memo1->Lines->Add(x[i][j]);// = Y[i][j];
 }
}
//вывод Y на Image 2
for(i=0; i<H; i++)
{
biImage=(BYTE*)(Form1->Image2)->Picture->Bitmap->ScanLine[i];
for(j=0; j<W; j++)
 {
biImage[j*3+2]= Y[i][j];
biImage[j*3+1]= Y[i][j];
biImage[j*3]  = Y[i][j];
 }
}
//обновление изображения на экране
Form1->Image2->Refresh();
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
Image1->Picture->Assign(NULL);
Image2->Picture->Assign(NULL);
Memo2->Lines->Clear();
Memo1->Lines->Clear();
Chart1->Series[0]->Clear();
Chart2->Series[0]->Clear();
}
//---------------------------------------------------------------------------
int Myx(int m, TMemo *Memo1)//, BYTE* biImage)
{
 for(i=0; i<=H; i++)
 for(j=0; j<=W; j++)
 if (m==x[i][j])
 L[r]= L[r]+1;
 Memo1->Lines->Add("Количество: "+String(L[r])+"  Значение: "+String(q));
 r++;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button5Click(TObject *Sender)
{
 for(q=0; q<=255; q++)
 Myx(q, Memo1);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{
int bound, temp, t, r=255, ghb;
bound = r-1;
  do
  {
   t=0;
   for(j=0; j<=bound-1; j++)
   if (L[j]<L[j+1])
   {
   ghb=gl[j];
   gl[j]=gl[j+1];
   gl[j+1]=ghb;
   temp=L[j];
   L[j]=L[j+1];
   L[j+1]=temp;
   t=j;
   }
   bound=t;
  }while(t);
  for(q=0; q<=255; q++)
  Memo2->Lines->Add("Количество: "+String(L[q])+"  Значение: "+String(gl[q]));
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button6Click(TObject *Sender)
{
 for(i=0; i<=255; i++)
 {
 Chart1->Series[0]->Add(L[i], gl[i], clBlue);
 }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button7Click(TObject *Sender)
{
  for(i=0; i<=255; i++)
 {
 Chart2->Series[0]->Add(L[i], gl[i], clBlue);
 }
}
Прикрепил саму программу чтобы легче было сориентироваться.
Вложения
Тип файла: rar Desktop.rar (5.03 Мб, 2 просмотров)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
18.04.2014, 15:23     Энтропия изображения
Посмотрите здесь:

C++ Динамические изображения С++
C++ сжатие изображения
Изображения в wxWidgets C++
Qt загрузка изображения C++
C++ Интерполяция изображения c++
C++ энтропия источника информации
C++ Количество информации.ЭНТРОПИЯ
C++ Обработка изображения

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

Текущее время: 02:06. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru