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

HELP(Timage Tbitmap)   Найти похожие ветки 

← →
zxcv   (2006-04-01 16:36) [0]

Народ подскажите в чем дело:

мышкой выделяю часть играющего видеоролика
когда жму расширить область выделения (radiobutton1)
на изображение в image добавляются шумы,
похожие на эффект ложных контуров
при уменьшении уровней квантования;

при уменьшении области выделения (radiobutton2)
все работает нормально

bm1:Tbitmap;
////////////////////
procedure TForm1.Timer1Timer(Sender: TObject);
begin
////////////////////

dc:=getDC(Panel1.Handle);
canva := TCanvas.Create;
canva.Handle:=dc;
player.Position:=Kadr;
////////////////////

bm1.Canvas.CopyRect (bm1.Canvas.ClipRect,Canva,Rect
       (min(x1,x2),min(y1,y2),max(x1,x2), max(y1,y2)));
image5.Canvas.StretchDraw(rect(0,0,image5.Width-1,image5.Height-1),bm1);

if radiobutton1.Checked then
 begin
  x1 := x1-1;
  y1 := Y1-1;
  x2 := X2+1;
  y2 := Y2+1;
 end;

if radiobutton2.Checked then
 begin
  x1 := x1+1;
  y1 := Y1+1;
  x2 := X2-1;
  y2 := Y2-1;
 end;
//////////////////////
end

---

← →
MBo ©   (2006-04-02 14:00) [1]

установи SetStretchBltMode HALFTONE

---

← →
zxcv   (2006-04-04 16:43) [2]

Что это значит
можно по подробнее пожалуйста

---

← →
MBo ©   (2006-04-04 16:57) [3]

подробнее в хелпе или в MSDN

---

← →
zxcv   (2006-04-05 00:02) [4]

спасибо, теперь все нормально.

только почему так происходит так и не понал

---

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

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



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