procedure TMainForm.Button1Click(Sender: TObject);
Begin
  ImageEnVect1.IO.LoadFromFile( 'D:\_Testfiles\ds1.jpg' );
  ImageEnMView1.SetImage( 1, ImageEnVect1.IEBitmap );
End;

procedure TMainForm.Button1Click(Sender: TObject);
Var
  bmp: TIEBitmap;
Begin
  bmp := TIEBitmap.Create;
  bmp.read( 'D:\_Testfiles\ds1.jpg' );
  ImageEnMView1.DeleteImage( 1 );
  ImageEnMView1.InsertImage( 1, bmp );
  bmp.free;
End;

procedure TMainForm.Button1Click(Sender: TObject);
Var
  bmp: TIEBitmap;
Begin
  bmp := TIEBitmap.Create;
  bmp.read( 'D:\_Testfiles\ds1.jpg' );
  ImageEnMView1.SetImage( 1, bmp );
  bmp.free;
End;