THCHARTS: HISTOGRAMME AVEC PLUSIEURS SERIES

Commentaire de tmcuh le 09/03/2005 12:37:23

très propre le graphisme, bravo,bonne prog
10

Commentaire de hbgz74 le 11/04/2005 18:28:51

peux tu mettre le code de l'exemple en VB stp
je débute encore en C#

Merci d'avance

Commentaire de TUHABITES le 14/04/2005 20:02:04

hbgz74, voilà une transcription du code en VB, je ne garantis pas qu'il va fonctionner étant donné mes maigres connaissances dans ce langage.

jujubaud, le code qui est dans le zip est commenté (pas beaucoup mais un peu quand même) et la page Exemple.aspx présente l'ensemble des propriétés sur lesquelles on peut aisément agir.
Pour ce qui est des variables passées dans le constructeur: le premier argument est un DataTable contenant l'ensemble des données chiffrées (entiers ou decimaux) et le deuxieme argument correspond au graduations que l'on souhaite voir sur l'axe des ordonnées.

<%@ Page Language="VB" %>
<%@ import Namespace="ThCharts" %>
<%@ import Namespace="System.Data" %>
<script runat="server">
    
   Sub Page_Load(sender As Object, e As EventArgs)

          
             Dim graduation(5) As Single={250f,500f,750f,1000.0f}
             Dim ds As DataSet
     ds=New DataSet()
             ds.ReadXml("data.xml")
             Dim hist As Histogram
     hist=New Histogram(ds.Tables[0],graduation)
                hist.Render(this.Context)
   End Sub

</script>


J'espère que celà vous aidera.

Commentaire de TUHABITES le 16/04/2005 11:23:12

On ne peut pas, sans transformation, utiliser la dll dans un winform il faudra pour cela faire les manipulations suivantes.

1- Dans le fichier histogram.cs (dans les sources du Zip) :
- ajouter la ligne: using System.IO;
- ajouter la surcharge suivante:
public Stream Render()
{
Stream stream=new MemoryStream();
System.Drawing.Image img;
Initialisation(tabl.GetLength(0));
  y=h+y;

img=Building(tabl,graduation,intitule);
if (err) img=Erreur();
Quality();
img.Save(stream,ici,eps);
return stream;
}
2- compiler.

3- Créer un Form comme suit en ajoutant bien ThCharts parmis les références.

using System;
using System.Drawing;
using System.Windows.Forms;
using System.IO;
using System.Data;
using ThCharts;

public class MainForm : System.Windows.Forms.Form
{
public MainForm()
{

InitializeComponent();


}

[STAThread]
public static void Main(string[] args)
{
Application.Run(new MainForm());
}

#region Windows Forms Designer generated code

private void InitializeComponent() {
//
// MainForm
//
this.AutoScaleBaseSize = new System.Drawing.Size(5, 13);
this.ClientSize = new System.Drawing.Size(608, 502);
this.Name = "MainForm";
this.Text = "MainForm";
this.Paint += new System.Windows.Forms.PaintEventHandler(this.MainFormPaint);
}
#endregion
void MainFormPaint(object sender, System.Windows.Forms.PaintEventArgs e)
{
float[] graduation={2.5f,5.0f,7.5f,10.0f};
DataSet ds=new DataSet();
ds.ReadXml("data1.xml");

Histogram hist=new Histogram(ds.Tables[0],graduation);
hist.width=400;
hist.height=500;
hist.unit="Kg";
string[] intitule={"Banane","Orange","Citron","Fraise"};
hist.titlesSeries=intitule;

Image image=Image.FromStream(hist.Render());
Graphics g=e.Graphics;
g.DrawImage(image,10,10);


}

}
4- compiler et executer. (penser à placer le fichier data1.xml dans le même répertoire.)

5- ça devrait marcher.

Commentaire de jujubaud le 18/04/2005 10:04:40

merci pour ce complément je vais tester
c'est sympas d'avoir pris le temp
Merci encore

Commentaire de elibou le 01/06/2005 21:56:34

Excellent composant, trés facile d'utilisation et effet de Tonnerre.
Félicitations

Commentaire de leroitony le 13/11/2005 00:50:49

Salut je te remercie pour ta source très bien faite.

Je me permets de te demander après quelque test une petite info

Quand je charge  Histogram hist=new Histogram(dt,graduation); ou dt est un DataTable qui contient une liste de nombre (via requête)

Le résultat est un graph. vue de profile

Qu’elle est la variable pour avoirs une vue de face comme lors de l'utilisation des fichier xml

Commentaire de Loneloup le 15/12/2005 14:36:36

Sublime, 3 petites questions :
Sachant que je programme en Vb.net et que les données proviennent d'un Datatable :
- Comment ajouter le titre des colonnes comme dans le screenshoot "le commercial","ses homologues")?
- j'utilise
        hist = New ThCharts.Histogram(Dtable, graduation)
        hist.Render(HttpContext.Current)
Le graphique efface completement les autres données de la page. comment y remédier et le placer à l'endroit voulu?
- Est il possible de modifier les couleurs sans modifier la dll thcharts?

Commentaire de Loneloup le 15/12/2005 16:56:11

Ok j ai trouve un moyen dérivé qui ne me satisfait pas entirement à cause de l'optimisation du code mais voila la soluce pour ceux qui pourrait avoir le meme problème:

1°) Dans la page ou doit s afficher le graphique (index.aspx), insérer une balise de cette maniere : <IMG src="DynImageAnnee.aspx"> (DynImageAnnee.aspx étant dans le même répertoire que votre page principale)

2°) Coder la page DynImageAnnee.aspx avec le calcul du graphique das le formload

Exécuter, le tour est joué.

Merci encore pour ce fabuleux code

PS: marche comment la fonction save?
toujours pas reussi

Commentaire de Loneloup le 15/12/2005 17:23:51

Une petite derniere astuce : Calcul automatique des paliers
On part du principe que TotHits sera toujours notre valeur la plus forte, la variable Palier permet de regler le degre de graduation (ex: pour un TotHits a 4000 le degre de graduation correct est 500) :
        Dim Palier As Integer = 500
        Dim Countgrad As Integer = 0
        Dim TempGrad As Integer = 0
        'Premiere boucle pour dimenssioner le tableau
        Do While TempGrad < tothits
            TempGrad = TempGrad + Palier
            Countgrad = Countgrad + 1
        Loop
        'Seconde boucle pour renseigner le tableau graduation
        Dim graduation(Countgrad + 2) As Single
        TempGrad = 0
        graduation(0) = Palier
        Countgrad = 0
        Do While TempGrad < TotHits
            Countgrad = Countgrad + 1
            TempGrad = TempGrad + Palier
            graduation(Countgrad) = TempGrad
        Loop

Commentaire de Loneloup le 03/01/2006 16:20:56

Salut,
Cela me permettrai de ne pas avoir à créer 1 page spécifique pour le graphique. Merci

Commentaire de The Red Man le 25/05/2008 19:32:34

Trop fort le graphique ! Meme sur photoshop jamais j'y arriverai faire ce que tu as fait !
Respect !