PictureProportional : Boolean;
Свойство PictureProportional позволяет сохранить пропорции изображения при изменении размера объекта. Если значение свойства True, то пропорции будут сохранены, при значении False - нет.
По умолчанию свойство имеет значение False.
В рассматриваемом примере предполагается существование объекта Ws типа IWxWorkspace.
Sub User;
Var
Ws : IWxWorkspace;
shape : IWxShape;
style : IWxStyle;
Begin
Shape := Ws.Shapes.Item(0);
Shape.Picture := GxImage.FromFile("c:\1.bmp");
Style := Shape.Style;
Style.PictureProportional := True;
End Sub User;
После выполнения примера при изменении размера объекта размер изображения будет масштабироваться с сохранением пропорций.
См. также: