TImage

//Timage

{

Timage Adalah Komponen Yang Berguna Untuk Menampilkan Image , Atau Foto ...

Untuk Menampilkan Image Ada Pada Properties "PICTURE"
Dan Untuk Mengatur Resolusi Mengikuti Komponen  Ada Pada Properties "STRECH"
Dan Adapun Pengaturan Resolusi Otomatiss ada pada Properties "PROPOTIONAL"


Contoh Mengganti Image Pada Saat Form Berjalan ...

Masukkan Komponen Button Dan Image

Sebelumnya Tambahkan Kata  "JPEG" Pada USES ... Di Bagian Paling atas Kode... Dan cari USES..
Seperti Dibawah ini


==========================================

unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
System.Classes, Vcl.Graphics,  Vcl.Controls, Vcl.Forms, Vcl.Dialogs , JPEG;

===========================================

INGAT TAMBAHKAN ...

JPEG Berguna untuk mendaftarkan Ekstensi Image Bertipe JPG ...

Setelah Itu masukkan kode Pada BUTTON1 ONCLICK Seperti Dibawah ini

}




//===========================================

procedure TForm1.Button1Click(Sender: TObject);
begin

Image1.picture.loadfromfile(' D:\Foto\CIEE.jpg ');
Image1.Propotional := True ;

end;


//===========================================


// Loadfromfile maksudnya Ambil dari data ...