Discussion :

[Olivekiki]

Salut à tous ! Je viens de commencer le builder y à pas longtemps et j'ai une aplication à faire dans laquelle j'ai un GroupBox où j'ajoute des images dedans et j'aimerai faire défiler le contenu de ce groupBox avec une ScrollBar. J'ai essayé avec la méthode ScrollBy mais j'ai plusieurs problèmes avec . Je vous montre ce que j'ai essayer mais ca marche pas bien.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
ScrollBar1->Max = SurveillanceVideo->GroupBox1->Height ;
ScrollBar1->Min = 0; 
 
void __fastcall TSurveillanceVideo::ScrollBar1Scroll(TObject *Sender,
      TScrollCode ScrollCode, int &ScrollPos)
{
        if( ScrollCode == scLineUp || ScrollCode == scPageUp && ScrollPos > 0 )
        SurveillanceVideo->GroupBox1->ScrollBy(0,ScrollPos) ;
        if( ScrollCode == scLineDown || ScrollCode == scPageDown )
        SurveillanceVideo->GroupBox1->ScrollBy(0,-ScrollPos) ;
        SurveillanceVideo->GroupBox1->Repaint() ;
}

Si vous avez d'autre idées ou si vous voyez pourquoi ca marche pas, je suis preneur de suggestion.
merci.

[Gilles Louïse]

Le GroupBox n'a pas de ScrollBar donc deux possibilités à mon avis :

ou bien vous ajoutez un ScrollBar vertical au GroupBox et vous programmez son comportement, c'est faisable mais difficile surtout si vous êtes débutant,

ou bien vous utilisez un cadre et non un GroupBox, il y aura alors un ScrollBar automatique. Pour cela, il faut faire Nouveau->Cadre, mettre les éléments dans le cadre (ou le faire par programme) et intégrer le cadre à la forme principale, vous cliquez sur "Cadres" sur la palette de composants puis sur la fenêtre.

À bientôt
Gilles

[Greybird]

Il y a aussi la possibilité d'utiliser un TScrollBox.

[Olivekiki]

Merci pour vos indications a tout les deux.
J'ai utiliser une scrollbox qui convient exactement à ce que je désirai faire.
Merci encore