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

pf15bit. Потестируйте код   Найти похожие ветки 

← →
DevilDevil ©   (2011-01-20 17:07) [0]

uses
 Graphics, TypInfo;

procedure TForm1.FormCreate(Sender: TObject);
var
 Bitmap: TBitmap;

begin
 Bitmap := TBitmap.Create;
 Bitmap.PixelFormat := pf15bit;
 Bitmap.Height := 1;
 Bitmap.Width := 1;
 Caption := GetEnumName(typeinfo(TPixelFormat), integer(Bitmap.PixelFormat));
 Bitmap.Free;

---

← →
DevilDevil ©   (2011-01-20 17:09) [1]

D6. pfCustom. должен быть pf15bit

---

← →
Ega23 ©   (2011-01-20 17:10) [2]

>  Потестируйте код

нету try..finally

---

← →
DevilDevil ©   (2011-01-20 17:17) [3]

>Ega23 ©   (20.01.11 17:10) [2]
Смотри надпись в Caption

---

← →
Ega23 ©   (2011-01-20 17:22) [4]

> Смотри надпись в Caption

Я до него ещё не дошёл, я пока на отсутствии try..finally остановился.
"План - г..но, я в нём участвовать отказываюсь, я - брезгую!" (с) "Интрены"

---

← →
DevilDevil ©   (2011-01-20 17:25) [5]

>"План - г..но, я в нём участвовать отказываюсь, я - брезгую!" (с)
в данном случае я рад

---

← →
TUser ©   (2011-01-20 17:28) [6]

поставь галку Use Debug DCUs и посмотри, почему меняется

в 7 меняется на присвоении Width

---

← →
MBo ©   (2011-01-20 17:40) [7]

В исходниках к статье
http://www.delphimaster.ru/articles/pixels/index.html
в методе Attach есть пример, как понять, что в pfCustom на самом деле лежит.

---

← →
DevilDevil ©   (2011-01-20 17:40) [8]

вопрос снимается
этот баг не исправлен и в D2006

меняется, потому что Delphi сравнивает флаг Compression на BI_RGB, а надо анализировать поля с флагом BI_BITFIELDS

---

← →
DevilDevil ©   (2011-01-20 17:41) [9]

>MBo ©   (20.01.11 17:40) [7]
спасибо

как раз человек помог кодом из этой библиотеки

---

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

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



Память: 0.46 MB
Время: 0.005 c