DELPHI IMAGE РАСТЯНУТЬ КАРТИНКУ

В Delphi есть несколько способов растянуть изображение. Один из них - использование компонента TImage и свойств Stretch:

Image1.Stretch := True;
Image1.Proportional := True;
Image1.Align := alClient;

Этот код установит свойство Stretch в True, что растянет изображение до размеров компонента TImage, свойство Proportional сохранит пропорции изображения и Align разместит TImage на форме.

Использование функции StretchBlt также позволяет растягивать изображения:

var
src, dest : TRect;
bm : TBitmap;
begin
bm := TBitmap.Create;
bm.LoadFromFile('image.bmp');
src := Rect(0,0,bm.Width,bm.Height);
dest := Rect(0,0,200,200);
StretchBlt(Canvas.Handle, dest.Left, dest.Top, dest.Right-dest.Left, dest.Bottom-dest.Top,bm.Canvas.Handle, src.Left, src.Top, src.Right-src.Left, src.Bottom-src.Top, SRCCOPY);
bm.Free;
end;

Этот код загружает изображение из файла image.bmp в экземпляр TBitmap, задает исходный и целевой прямоугольники и использует StretchBit для растяжения изображения.

28 Delphi 7 Компоненты Image, Shape

C# : Some images are being rotated when resized

Урок на делфи 46. Как написать текст поверх изображения

24 Компонент Image и ImageList

Как поставить красивый фон из картинки делфи программирование

⚡️Началось! ФЕЙГИН: Путина УБЕРУТ из ТЕЛЕВИЗОРА. Россиян ГОТОВЯТ к большому ОТСТУПЛЕНИЮ. ОБМАН Шойгу

Delphi 023 Image / 2 Stretch picture

Урок на делфи 19. подстройка компонентов под размер формы

Реклама
Новое
Реклама