Zoom photo

Hello Destiny

Tu pourrais essayer ce code derrière une bouton BtnZoom

// Redimensionne le BitMap
  Image1.Picture.Bitmap.Width  := round(Image1.Picture.Bitmap.Width  *1.1);
  Image1.Picture.Bitmap.Height := round(Image1.Picture.Bitmap.Height *1.1);

  // Redimensionne le "conteneur" Timage dans le scrollbox
  Image1.Width  := round(Image1.Width  *1.1);
  Image1.Height := round(Image1.Height *1.1);

  // Copier aux nouvelles dimensions
  Image1.Picture.Bitmap.Canvas.StretchDraw(Image1.Picture.Bitmap.Canvas.ClipRect,B);
Je vais tester ce code et revenir vers toi.

Par contre j'ignore si MVD permet de travailler sur les Canvas, j'ai déjà rencontrer des refus de sa part.

You could try this code behind a BtnZoom button

  // Resize the BitMap
   Image1.Picture.Bitmap.Width: = round (Image1.Picture.Bitmap.Width * 1.1);
   Image1.Picture.Bitmap.Height: = round (Image1.Picture.Bitmap.Height * 1.1);

   // Resize the Timage "container" in the scrollbox
   Image1.Width: = round (Image1.Width * 1.1);
   Image1.Height: = round (Image1.Height * 1.1);

   // Copy to the new dimensions
   Image1.Picture.Bitmap.Canvas.StretchDraw (Image1.Picture.Bitmap.Canvas.ClipRect, B);
I will test this code and get back to you.
On the other hand I do not know if MVD allows to work on the Canvas, I have already met refusals from him

JB

Thanks to Jean and Derek for their efforts but it works for enlargements but not for zooms. What I am looking for is to be able to enlarge a detail on a stamp, ie enlarge the image and then zoom in on a detail. I don't know if this is possible with MVD.

Merci a Jean et a Derek pour leurs efforts mais cela fonctionne pour les agrandissements mais pas pour les zooms. Ce que je recherche c'est de pouvoir agrandir un détail sur un timbre, c'est a dire agrandir l'image puis de zoomer sur un détail. Je ne sais pas si c'est possible avec MVD.

Destiny