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

Перемещение картинки   Найти похожие ветки 

← →
VasRog ©   (2004-04-12 21:27) [0]

Вопросик назрел: как можно перемещать изображение по TImag"у не используя Draw. С использованием Draw я сделал вот так:
............................
Xloc:=TrackBar5.Position;
Yloc:=TrackBar6.Position;
Image2.Canvas.Brush.Color:=Color;
Form1.Image2.Canvas.Draw(Xloc,Yloc,p);
Form1.Image2.Canvas.FillRect(Image2.Cli­entRect);
Form1.Image2.Canvas.Draw(Xloc,Yloc,p);
.............................
Но если так сделать, то верхний левый угол картинки переместится в точку (Xloc, Yloc) и при вращении картинки ее верхняя часть будет иногда вылезать как бы за край экрана (следствие переноса в.л.у.) что достаточно странно смотрится, особенно если картинка находится в центре TImag" а.

---

← →
dmk ©   (2004-04-13 23:09) [1]

Windows.ScrollDC(Canvas.Handle, DeltaX, DeltaY, ScrollRect, ClipRect, 0, nil);

---

← →
VasRog ©   (2004-04-14 22:50) [2]

Что-то не получается. Объясни поподробнее что такое ScrollRect, ClipRect или может быть ошибка сокрыта в нулях, но прописав эту строку у меня просто весь TImage заливается белым цветом.

---

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

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



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