Image - StretchBlt

← →
IGORka (2003-06-02 18:18) [0]

Уважаемие мастера Delphi!
У меня есть одна проблема:
при уменшении размера картинки (Image) следующим способом:
StretchBlt(Form1.Image2.Canvas.Handle, 1, 1, w-15, h-15,
( w-10) Уважаемие мастера Delphi!
У меня есть одна проблема:
при уменшении размера картинки (Image) следующим способом:
StretchBlt(Form1.Image2.Canvas.Handle, 1, 1, w-15, h-15,
Form1.Image1.Canvas.Handle, 1, 1, w, h,SRCCOPY);
или

dest.Left := 1;
dest.Top := 1;
dest.Right := (w-10);
dest.Bottom := (h-10);
source.Left := 1;
source.Top := 1;
source.Right := w;
source.Bottom := h;
Form1.Image2.Canvas.CopyRect(dest, Image1.Canvas,source);

на изображении возникают квадратики.
что делать??? может есть кое-какие варианти решения етой проблеми????

← →
Думкин © (2003-06-03 06:21) [1]

Смотря какая у тебя винда.
Если 2000 то все просто:
SetStretchBltMode(Canvas.Handle,HalfTone);
Если 98 или МЕ то надо или самому или воспользоваться библиотекой Graphics32 http://g32.org

Image - StretchBlt - CopyRect Найти похожие ветки