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

Film.Transparent:=True;   Найти похожие ветки 

← →
HF-Trade   (2004-06-22 21:51) [0]

Господа, подскажите как задать Transparent:=true кадрам битмапа в данной ситуации?

........
VK_DOWN:
begin
Film := TBitMap.Create;
Film.LoadFromFile(FILMFILE);
WKadr := Round(Film.Width/N_Kadr);
HKadr := Film.Height;
Rect1 := Bounds(200,200,WKadr,HKadr);
RectKadr:=Bounds(WKadr*CKadr,0,WKadr,HKadr);
Form1.Canvas.CopyRect(Rect1,Film.Canvas,RectKadr);
CKadr:=CKadr+1;
IF CKadr = N_KADR then CKadr:=0;
.......

---

← →
Palladin ©   (2004-06-22 22:02) [1]

Какие у битмапа кадры? И вообще TBitmap + F1

---

← →
HF-Trade   (2004-06-22 22:12) [2]

Битмап разбит на 8-мь кадров...как каждому ПО ОТДЕЛЬНОСТИ задать прозрачность...как ВСЕМУ сразу задать прозрачность?
Ы?
Мож я не так описал проблему?

---

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

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



Память: 0.45 MB
Время: 0.019 c