[TImage]Déplacer vue, scrolls

Bonjour,

Je cherche à pouvoir voir une grande TImage, et vu qu'elle est trop grande, j'aimerais avec 2 scrolls pouvoir déplacer la vue.
C'est à dire calculer selon la longueur et largeur de l'image et selon la position du scroll qu'est-ce qui sera afficher.

Comme par exemple photoshop quand on zoom on peut se déplacer sur l'image à l'aider des scrolls, j'aimerais faire la même chose.

Je ne m'y connais pas trop en scroll ni en TImage. Merci d'avance.

J'ai trouvé quelque truc sur le forum: Image1->SetBounds.

:!: J'ai 1 problème important avec cette méthode, je vois mon image dans tous le form
:!: Quand elle se déplace le reste de mon image n'est pas montrer, il n'y a pas le reste de l'image qui s'affiche

Je sais pas pourquoi et je ne sais pas comment non plus régler ça, des petits conseils, c'est avec plaisir !

:arrow: Voici mon code

Code:

---

1 2 3 4

Image1->SetBounds(Image1Left - DownScroll->Position, Image1Top - HorScroll->Position, Image1->Width, Image1->Height);

---

Image1 est un TImage, HorScroll est mon scroll honrizontal et DownScroll est le scroll du bas.

Merci de m'éclairer un peu.

Bonjour,

Et en placant le TImage dans un TScrollBox ?

Cordialement,

Arnaud

Ah, je ne connaissais pas le TScrollBox.

Une dernière question, est-il possible que quand on déplace le scroll sans relacher de voir l'image défiler, comme le font beaucoup de programme ?

Sinon merci beaucoup !!!

Bonjour,

Utilise la propriété Tracking à true des propriétés ScrollBars du TScrollBox.

Cordialement,

Arnaud

Merci beaucoup GreyBird !!!!