Как из TImage удалить картинку?
Добавлено: 30 авг 2008, 16:49
Всем привет! Такая вот зараза эта TImage, загружаю в него картинку через OpenDialog, в свойствах Image стоит Stretch, AutoSize и Proportional = true. Загружаю в его картинку размерм 400х400, все ништяк, загружаю в него же картинку 300х300 происходит косяк, остальные 100х100 отображаю старую картинку, т.е. произошло наложение картинок разных размеров. Как этого избежать? В идеале нужно вернуть первоначальный вид компонента Image, как-будто в него ничего не грузили еще.
ПРобовал закрасить фоном формы, получается что при загрузки второй картинки у меня рамка больше чем сама картинка.
Код: Выделить всё
Image1.Canvas.StretchDraw(Rect(0,0,x,y),I1_Pic.Picture.Graphic);
где x и y это размеры картинки. 400х400 и т.д.