hi!I have a problem. There's the Access database embedded into dbrid using ADO.
In db there is a list of goods,quantity and countries where goods were produced
Now I have to build a diagram for db, for example for countries.
It works quite well but the diagram shows EVERY good, writes a country name and makes a column for each good.
I wonder if there's a way to make one column for each country.
Here is also a pic of diagram - image
procedure TForm4.BitBtn1Click(Sender: TObject); var m: array of string; bb: array of integer; I: integer; begin chart1.show; Chart1.Series.Clear; SetLength(m, Form2.adotable1.RecordCount); // changes mas size SetLength(bb, Form2.adotable1.RecordCount); I := 0; while not Form2.adotable1.Eof do begin if Form2.adotable1.FieldByName('country').AsString <> '' then begin m[I] := Form2.adotable1.FieldByName('country').AsString; bb[I] := 0; I := I + 1; end; form2.adotable1.Next; end; Form2.adotable1.First; I := 0; Form2.adotable1.First; while not Form2.adotable1.Eof do begin for I := 0 to length(m)-1 do if m[I] = Form2.adotable1.FieldByName (Form2.DBGrid1.Columns.Items.DisplayName).AsString then bb[I] := bb[I] + Form2.adotable1.FieldByName (Form2.DBGrid1.Columns.Items.DisplayName).AsInteger; Form2.adotable1.Next; end; Form2.adotable1.First; for I := 0 to length(m)-1 do if m[I] <> '' then begin Chart1.Series.Add(bb[I], m[I], clTeeColor); end; end;
And are there any other ways to make such diagram?
Will be grateful for any help!