Масштабирование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); ????

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

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

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

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

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

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