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

МасштабированиеTImahe.Canvas   Найти похожие ветки 

← →
DelphiLexx ©   (2005-10-25 15:25) [0]

Компонент TImage расположен на TPanel"и и TImage.Align := true. TPanel может легко увеличиваться и уменьшатся в связи с чем TImage также легко увеличивается и уменьшается. На TImage рисуется кружок, затем при увечении TPanel"и TImage начинает увеличиваться происходит перерисовка кружка,  но после определенного увелечения крожок занимает не новые размеры TImage а первоначальные. Мне нужно сделать так чтобы TImage.Canvas при увеличении и при уменьшении занимал бы всю область TImage.

---

← →
Ega23 ©   (2005-10-25 15:34) [1]

> TImage.Canvas при увеличении и при уменьшении занимал бы
> всю область TImage.


???????????????????????????????????????
Ты знаешь, что такое canvas????

---

← →
DelphiLexx ©   (2005-10-25 15:41) [2]

> Ты знаешь, что такое canvas????

Знаю. Поясняю ещё раз. Берем рисуем на TImage.Canvas кружок который занимал бы весь объём Image (по высоте и ширине). Теперь увеличиваем размер Image по высоте и ширине на 100%. Очищаем Image.Canvas и пытаемся нарисовать кружок который занимал бы весь объём Image (по высоте и ширине). И что мы видим, а то что отобразится не весь круг, а только та часть круга которая вмешается в размеры Image.Canvas"а до увеличения.

---

← →
Ega23 ©   (2005-10-25 15:58) [3]

> Знаю. Поясняю ещё раз. Берем рисуем на TImage.Canvas кружок
> который занимал бы весь объём Image (по высоте и ширине).
>  Теперь увеличиваем размер Image по высоте и ширине на 100%.
>  Очищаем Image.Canvas и пытаемся нарисовать кружок который
> занимал бы весь объём Image (по высоте и ширине). И что
> мы видим, а то что отобразится не весь круг, а только та
> часть круга которая вмешается в размеры Image.Canvas"а до
> увеличения.
>


Image1.Canvas.Ellipse(Image1.ClientRect);   ????

---

← →
MBo ©   (2005-10-25 16:02) [4]

При изменении размеров Image меняй и размеры Image.Bitmap

---

← →
DelphiLexx ©   (2005-10-25 16:21) [5]

> Image1.Canvas.Ellipse(Image1.ClientRect);   ????

Твоя конструкция не работает.

---

← →
Ega23 ©   (2005-10-25 16:39) [6]

> Твоя конструкция не работает.
>


У тебя не работает. У меня, почему-то всё работает. Странно, не правда-ли?

---

← →
DelphiLexx ©   (2005-10-25 19:03) [7]

> У тебя не работает. У меня, почему-то всё работает. Странно,
>  не правда-ли?

Не знаю. Посмотри мой пример, может быть, что не так делаю:
http://www.rsdn.ru:80/File/26841/Canvas.rar

---

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

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



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