procedure TForm1.Split1Click(Sender: TObject);
begin
  ImageEnMView1.Clear;
  ImageEnMView1.AppendSplit(ImageEnView1.IEBitmap, ImageEnView1.IEBitmap.Width,
     ImageEnView1.IEBitmap.Height div 3);
  ImageEnMView1.Update;
end;

ImageEnMView1.Width := 600;
ImageEnMView1.ThumbnailClipping := 10;
ImageEnMView1.SetModernStyling(False, 550, 150);