Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

МасштабированиеTImahe.Canvas


DelphiLexx ©   (2005-10-25 15:25:00) 

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


DelphiLexx   (2005-10-25 19:03:00) [1]


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

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


Ega23   (2005-10-25 16:39:00) [2]


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


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


DelphiLexx   (2005-10-25 16:21:00) [3]


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

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


MBo   (2005-10-25 16:02:00) [4]

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


Ega23   (2005-10-25 15:58:00) [5]


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


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


DelphiLexx   (2005-10-25 15:41:00) [6]


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

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


Ega23   (2005-10-25 15:34:00) [7]


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


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


Наверх

Титульная страница Поиск, карта сайта Написать письмо