Вниз
Скачать: CL | DM;

отрисовка в image   Найти похожие ветки 

 
Kos ©   (2009-04-03 21:04) [0]

Подскажите, пожалуйста, как можно отобразить на Image быстро и корректно? Имеется матрица со значениями цветов RGB, известна ширина, высота картинки. С помощью Image.Canvas.Pixels[i,j] долго, а с помощью API функции SetDIBits иногда Canvas белого цвета, глючная функция. Есть другие методы?


 
Игорь Шевченко ©   (2009-04-03 21:11) [1]

есть. заполнять битмап в памяти и выполнять bitblt. Примерно так работает doublebuffering


 
KilkennyCat ©   (2009-04-03 21:17) [2]

Есть еще статья http://www.delphimaster.ru/articles/pixels/index.html


 
Игорь Шевченко ©   (2009-04-03 21:27) [3]


> с помощью API функции SetDIBits иногда Canvas белого цвета,
>  глючная функция


Надеюсь, Microsoft извещен о том, что сделал глючную функцию и должен возместить моральный ущерб ?


 
KilkennyCat ©   (2009-04-03 21:35) [4]

Моральный, потому что белывй цвет - цвет траура. В Японии (или Китае, вообщем - там).


 
Kos ©   (2009-04-23 20:40) [5]

Приведу пример кода, может подскажет кто, что не так? Вот если размер изображения не превышает размера image, то изображение отображается, если превышает, то image белый, Bitmap пустой. Возможно, надо память выделить под BitMap. Матрица arraycolor заполнена правильно.


BM : TBitmap;
DC : HDC;
HB : HBitmap;
Bi : PBitmapInfo;
arraycolor : array of integer;

 BM := TBitmap.Create;
 DC:=GetDC(Form1.Handle);
 BM.Height := h;
 BM.Width := w;
 image1.Picture.Bitmap.Height := h;
 image1.Picture.Bitmap.Width := w;
 HB:= BM.Handle;
 GetMem(Bi,sizeof(TBitmapInfoheader));

 Bi^.bmiHeader.biSize:= sizeof(bi.bmiHeader);
 Bi^.bmiHeader.biWidth:= w;
 Bi^.bmiHeader.biHeight:= h;
 Bi^.bmiHeader.biPlanes:= 1;
 Bi^.bmiHeader.biBitCount:= 32;
 Bi^.bmiHeader.biCompression:= BI_RGB;
 Bi^.bmiHeader.biSizeImage:= 0;
 Bi^.bmiHeader.biClrUsed:= 0;
 Bi^.bmiHeader.biClrImportant:= 1;

 SetDIBits(DC,HB,0,h,arraycolor,Bi^,DIB_RGB_COLORS);

 BM.Canvas.Refresh;
 Image1.Picture.Bitmap.Assign(BM);
 image1.Invalidate;



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.006 c
2-1240403175
devidart
2009-04-22 16:26
2009.06.07
Сортировка таблици


4-1210848857
nick_sniper2
2008-05-15 14:54
2009.06.07
Как остановить "завершение работы Windows"?


4-1210775223
re_qas
2008-05-14 18:27
2009.06.07
ADSI в DLL


15-1238793616
Германн
2009-04-04 01:20
2009.06.07
Копирование документов для отправки их по электронной почте.


15-1238836320
Немо
2009-04-04 13:12
2009.06.07
sql Server Enterprise Manager, как скопировать job?




   Наверх