@Fito, creo que lo hace automáticamente cuando ve que los datos ya no caben, pero no lo hacen todas las vistas sino solo en las del tipo Bar:
https://forum.codejock.com/chartcont...opic17500.html
Código VB:
Dim Diagram As ChartDiagram2D
Set Diagram = ChartControl.Content.Series(0).Diagram
Diagram.AllowScroll = True
'Diagram.AllowZoom = True 'Optional
Diagram.AxisX.Range.ViewAutoRange = False
Diagram.AxisX.Range.ViewMaxValue = 5 (number of bars visible in view)
En Cobol es así:
Código COBOL:
01 COB-DIAG OBJECT REFERENCE POW-COBJECT.
01 OBJ-DIAG OBJECT REFERENCE COM.
01 OBJ-AXIS OBJECT REFERENCE COM.
01 OBJ-RANG OBJECT REFERENCE COM.
01 VERDAD PIC X VALUE "1".
01 FALSO PIC X VALUE "0".
01 numBars PIC 9 value 3.
...
*> Scrollable
move "Diagram" OF "Item"(0) OF "Series" OF "Content" OF chartcontrol1 to COB-DIAG
CALL "POWERCONVTOCOM" USING COB-DIAG RETURNING OBJ-DIAG
invoke OBJ-DIAG "get-AxisX" returning OBJ-AXIS
invoke OBJ-AXIS "get-Range" returning OBJ-RANG
invoke OBJ-DIAG "set-AllowScroll" using VERDAD
invoke OBJ-RANG "set-ViewAutoRange" using FALSO
invoke OBJ-RANG "set-ViewMaxValue" using numBars
En numBars hay que poner cuántas barras quieres que se vean, a partir de ahí habrá que usar el scroll.
Lo he probado y funciona.