Delphi

Вопрос

Допустим, на фоме есть Image1 размером 200х160. Как нажатием кнопки Button1 пропорцианально уменьшить Image1 до размеров 150х120, т.е. сохранить отношение ширины и высоты картинкаи?

Ответ

свойство Stretch:=true //картинка масштабируется

свойство Proportional := true //понятно з названия :)

свойство Width:=xxx //ширина

свойство Height:=xxx //высота

Из конференции Expert_FAQ