Изменить поведение Stretched у Picture

Паша

Проблема в следующем:
в отчете иммется компонент Picture, расположенный на странице,
через FileLink в него загружается изображение,
изображения все разного размера,
отображать их необходимо в пределах размеров заданных для компонента,
включаю Stretched - все здорово для больших картинок (вписываются в размер компонента),
но при этом маленькие растягиваются до размера компонента,
что совсем нежелательно, т.к. некоторые изображения небольшого размера
и плохого качества.

Возможно ли как-то заставить компонент не использовать Stretched для маленьких картинок ?
Что для этого необходимо анализировать, если реализовывать через скрипт ?

Заранее благодарен всем откликнувшимся.

stan5

Можно проанализировать размеры рисунка после загрузки его в picture object:

в picture object в событиях -> onafterdata (пример на Delphi) пишем
if pictureobject1.Height> та-та-там then pictureobject1.Stretched:=true