Abrir proyecto ... Convertir datos de tabla a gráfico de bar

Aquí pueden poner todos los programas y utilidades que hayan creado con AMS.
Abrir proyecto ... Convertir datos de tabla a gráfico de barras

Paz, misericordia y bendiciones de Dios

Queremos convertir los datos de la tabla en un gráfico de barras
Por supuesto, la adición de PieChart convierte las estructuras en un gráfico, pero en forma de círculo dividido según los porcentajes.
En el proyecto abierto, nos referimos al elemento de cuadrícula de datos
Por supuesto, especificamos en la columna de columnas el número de columnas y en la columna del último número de líneas
------- En nuestro ejemplo, bastará con dos columnas hasta que el código se modifique para aceptar un número ilimitado de columnas --------------
De acuerdo con el número de columnas y líneas, utilizamos el código para mostrar las publicaciones según sea necesario, y las variables son Nrow para el número de líneas, y Ncol es para el número de columnas.

Código: Seleccionar todo

Grid.SetRowCount("Grid1", Nrow);
Grid.SetColumnCount("Grid1", Ncol); 
Luego dibujamos una línea horizontal que representa el número de líneas, es decir, elementos del borde, por ejemplo, el número de secciones o libros .........
Luego consideramos que la longitud de la línea es la referencia y colocamos las columnas en orden de acuerdo con el número de la tabla
Lo mismo hacemos una línea vertical y su longitud es la referencia
Ahora ponemos todos los valores en el único en una matriz, luego extraemos los más grandes y ponemos la longitud de la degradación de la columna.
Luego asignamos todos los demás valores a esta longitud

Luego, use pageCreat para crear imágenes y especificar su longitud de acuerdo con los valores

Código: Seleccionar todo

Page.CreateObject(OBJECT_IMAGE, "A"..i, tblImageProps) 
La misma función para crear un banner en la parte inferior de cada imagen representa el nombre de la columna y otro banner encima del oud en el que el valor de la columna es

Código: Seleccionar todo

Page.CreateObject(OBJECT_LABEL, "LB"..i, tblLabelProps); 
Imagen

Abrir documento:
https://up.top4top.net/downloadf-686ghso81-rar.html


Buena suerte
un muy buen ejemplo muchas gracias por compartir.
Agradecido por sus aportes :pc:
Gracias Igli Igli, se te agradece.