Positionnement précis de la scrollbar dans un stringgrid
Bonjour à tous,
voilà, je suis assez friand des stringgrids, car très pratiques.
Mais ce qui leur fait cruellement défaut c'est un positionnement de leurs scrollbars qui permettrait d'afficher les lignes 100 à 109 dans un stringgrid qui en n'affiche que 10 à la fois par expl, alors qu'il commence son affichage par la première ligne.
En gros, je voudrais pouvoir écrire :
AfficheLeContenuDuStringgrid1APartirDeLaLigne (100);
J'ai dejà trouvé sur le forum comment forcer la selection courante, mais hélas l'affichage n'en est pas modifié...
Pour mon problème j'ai une piste avec SetScrollInfo et GetScrollInfo
le code pourrait donner ceci : (mis sur un bouton pour tester...)
Code:
1
2
3
4
5
6
7
8
9
| procedure TForm1.Button1Click(Sender: TObject);
var tsi:tagSCROLLINFO;
begin
GetScrollInfo(stringgrid1.Handle,SBS_VERT,tsi);
SetScrollInfo(StringGrid1.Handle,SBS_VERT,tsi,true);
end; |
mais entre le GetScrollInfo et set SetScrollInfo il doit manquer qqchose
comme SCROLLINFO , mais là j'avoue être dépassé par la syntaxe.
Je pensais qu'il s'agissait d'un problème courant et résolu depuis longtemps mais il n'y a aucun post sur GetScrollInfo et cie (pour Delphi en tt cas)
Pourtant je ne dois pas être le seul à utiliser ce composant :roll:
Voilà, si quelqu'un à dejà réussi à coder cela, je lui serait très reconnaissant de m'aider.
