Plaats een TChart op het Form
Dubbelklik op het TChart
Add, en kies voor het type Bar
Serie1 is nu gemaakt en is van het Type Bar
Maak er nog een:
Add, en kies weer voor het type Bar
Code:
//De Oude Grafiek Gegeven wissen
Series1.Clear;
Series2.Clear;
//Grafiek Instellingen
Chart1.Visible := True;
Chart1.Title.Text.Text := 'Titel Tekst';
Chart1.Title.Font.Size := 40; //Titel Tekst grote
Chart1.Title.Font.Color := TAlphaColorRec.Black; //Titel Letter Kleur
Chart1.LeftAxis.Automatic := True; //De Linker Schaal verdeleing Handmatig instellen: Uit
Chart1.BottomAxis.LabelsFont.Size := 18; //Letter grote onder de Grafiek
Chart1.View3d := False; //2D Weergave
Series1.Marks.Visible := False; //Geen Tekst veldje boven elke Staaf van Serie 1
Series2.Marks.Visible := False; //Geen Tekst veldje boven elke Staaf van Serie 2
//Legenda (Info veld rechts naast het Grafiek)
Chart1.Legend.Visible := True; //Wel of niet Weergeven, en bij 'True' (wel weergeven), kiezen uit welke Serie
Series1.ShowInLegend := False; //
Series2.ShowInLegend := True; //Data uit Serie 2 Weergeven in de Legenda
//Welke Serie('s) Weergeven:
Series1.Visible := True; //Serie 1 Weergeven
Series2.Visible := True; //Serie 2 Weergeven
//De Data vullen:
Series1.Add (10, 'MA', TAlphaColorRec.Green);
Series2.Add (20, 'MA', TAlphaColorRec.Red);
Series1.Add (12, 'DI', TAlphaColorRec.Green);
Series2.Add (24, 'DI', TAlphaColorRec.Red);
Series1.Add ( 8, 'WO', TAlphaColorRec.Green);
Series2.Add (22, 'WO', TAlphaColorRec.Red);
Series1.Add (14, 'DO', TAlphaColorRec.Green);
Series2.Add (21, 'DO', TAlphaColorRec.Red);
Series1.Add (13, 'VR', TAlphaColorRec.Green);
Series2.Add (25, 'VR', TAlphaColorRec.Red);
Series1.Add (14, 'ZA', TAlphaColorRec.Green);
Series2.Add (28, 'ZA', TAlphaColorRec.Red);
Series1.Add ( 6, 'ZO', TAlphaColorRec.Green);
Series2.Add (12, 'ZO', TAlphaColorRec.Red);
Bookmarks