Discussion :

[SergioMaster]

bonjour ,

voila tout est dans le titre, sur une form j'ai un stringgrid d'un certain nombre de colonnes .
propriétés au design time

Align:=AlBottom
scrollbars:=ssHorizontal
colcount :=50
VisibleColCount:=10

tout est ok quand la taille de mon stringgrid "dépasse" la taille de ma form
seulement voilà si je retaille mon stringgrid en cours d'execution (par exemple ColCount:=5)
plus de scrollbar

je sais
comment detecter s'il y a ou non scrollbar (tres bon truc )

Code :

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

  GetWindowlong(Stringgrid.handle,GWL_STYLE) OR WS_HSCROLL <> 0

j'ai essayé

Code :

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

1
2
3
4
5
6
 
style : longint; .....
 
style:=GetWindowlong(Stringgrid.handle,GWL_STYLE) ;
style:=style OR WS_HSCROLL;
SetWindowLong(Stringgrid.handle,GWL_STYLE,style);

mais ou le mettre

A moins qu'il y ait une autre astuce

[SergioMaster]

Eureka
j'ai désespéré trop vite, et pas assez "googler" , la solution

Code :

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

1
2
3
4
 
Stringgrid.ColCount:=5
// juste aprés j'ai rajouté ceci
ShowScrollBar(Stringgrid.Handle,SB_HORZ,true);