Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.21;
Скачать: CL | DM;

Вниз

векторизация, bmp-формат   Найти похожие ветки 

 
nichtferstein   (2002-11-19 22:21) [0]

подскажите,плз. нужно считать файл в формате бмп так, чтобы получить координаты фигур на рисунке,т.е. по сути задача сводится к векторизации растрового изображения. там всего 2 цвета(белый и черный). но пока считать и правильно интерпретировать полученные данные не получилось. я не могу понять, каким образом его нужно считать, чтобы получить информацию о каждой точке. вероятно нужно получить данные в бинарном виде, чтобы идентифицировать каждую точку и её цвет, но к сожалению ничего не получатся....может кто-то уже из вас сталкивался с этим ?


 
boy   (2002-11-20 06:43) [1]

Есть вот такой вариант считование вмр.Это самый маленький.
procedure Tform1.BmpTexture;
var
i, j: Integer;
begin
bitmap := TBitmap.Create;
bitmap.LoadFromFile("A_1 copy.bmp");
For i := 0 to 63 do
For j := 0 to 63 do begin
bits [i, j, 0] := GetRValue(bitmap.Canvas.Pixels[i,j]);
bits [i, j, 1] := GetGValue(bitmap.Canvas.Pixels[i,j]);
bits [i, j, 2] := GetBValue(bitmap.Canvas.Pixels[i,j]);
end;
glBindTexture(GL_TEXTURE_2D,BmpTex[0]);
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA,
64, 64,-Это размеры картинки в точках
0, GL_RGB, GL_UNSIGNED_BYTE, @Bits);
glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_DECAL);

end;



Страницы: 1 вся ветка

Текущий архив: 2003.04.21;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.103 c
1-67195
Pk
2003-04-08 14:55
2003.04.21
Удалить файл выполняющейся программы


6-67428
D
2003-02-19 13:45
2003.04.21
Имя или IP компьютера


1-67207
tytus
2003-04-10 15:04
2003.04.21
XML


1-67241
KHEXT
2003-04-08 21:01
2003.04.21
наследники TMenuItem шалят...


14-67450
Dimodim
2003-04-02 07:53
2003.04.21
Как посчитать Лапласа функцию