Newsgroup: it.comp.lang.delphi
Titolo: TDBchart... Non trova i dataset

Salve a tutti, o io sto rinco....nendo oppure c'è qualcosa che non va...
allora io so che se schiaffo un TDBChart su una form nelle cui uses c'è il
data module con i clientdataset so per certo che se aggiungo una serie al
chart allora nella proprietà datasource dovrei poter selezionare i dataset
disponibili ma quando vado a cercare i dataset il combobox è vuoto mentre se
il clientdataset lo metto sulla form allora lo trova....
Suggerimenti...?
Ciao
Antonio.
-- 
uno standard deve essere standard. windows non e` uno standard, e` solo
un OS molto diffuso.

 dataset il combobox è vuoto
Ho avuto (quasi) il tuo problema anch'io tempo fa, senza trovare risposta.
Vediamo se tu sei più fortunato...
-- 
Jax
====
Il confine tra l'amicizia e l'amore sta in un bacio .

 Jax
Ma in qualche modo avrai risolto...?
Altrimenti sono sfigato.
Antonio.

 Antonio.
-- 
Ciao, Anto', [37, 143, AQ] 
MB C SC 220 CDI Magma Rot
"Di sempre cio' che senti e fai cio' che pensi."
    G.G. Màrquez


D5 sp1
Ciao
Antonio.

 Altrimenti sono sfigato.
Sě, con un Chart a mano :)
-- 
Jax
====
L'oro non č tutto. C'č anche il platino. (Paperon de' Paperoni)

 ha scritto nel messaggio
news:2q65edF...@uni-berlin.de...

Ovvero? Se mi spieghi procedo come te... non ho molta esperienza con i
grafici.
Grazie
Antonio.

 grafici.
Visto che non riuscivo a usare il DBChart, mi sono creato un TChart e l'ho
popolato a mano scorrendo il database.
Non è certo una soluzione comoda (mi sono un po' perso nell'help e nei
tipi), ma era l'unica via... per fortuna dovevo solo creare un diagramma a
torta, quindi la cosa non era complicata.
-- 
Jax
====
Se, secondo la legge islamica, dalle nostre parti si tagliasse la mano
ai ladri, avremmo soltanto dei compositori con una mano sola. (Leonard
Bernstein)

 Suggerimenti...?
Come dicevo ad Antonio in privato (ho sbagliato a premere il pulsante), 
se il Data Module è aperto (il codice sorgente è visualizzato) ma i 
ClientDataSet non sono ancora visibili, è possibile che si tratti di un 
bug e/o di una limitazione dell'editor del componente DBChart.
Ad ogni modo, in generale ciascun elemento che costituisce il grafico 
(tipi di grafici, serie di punti, ecc.) sono rappresentati da 
componenti; selezionando i componenti interessati attraverso l'Object 
TreeView oppure l'Object Inspector, è possibile impostarne le proprietà 
seguendo il metodo convenzionale...se si tratta di un bug del Component 
Editor, si dovrebbe riuscire ad associare il ClientDataSet usando 
l'Object Inspector.
Ciao a tutti! :-)
-- 
Marco «Alka» Breveglieri
  ABLS Team S.n.c. - Software & Web
  Via De Gasperi, 14
  42019 Scandiano (Reggio Emilia)
 
http://www.abls.it

 grafici.
Guarda un po' se ci capisci qualcosa...
E' una procedure che mi fa il grafico di x serie di dati rappresentati 
in un albero.
Sono dei totali mensili raggruppati per anno.
Questa e' la definizione del record, cosi (forse) e' piu' chiaro:
TTipoRiepilogo = (
                     trAnno,
                     trMese ,
                    );
   TRiepilogo = Record
     Id : integer;
     Tipo : TTipoRiepilogo;
     Anno : integer;
     Mese : integer;
     Caption : string;
     Ricavo:  Currency;
   end;
   PRiepilogo = ^TRiepilogo;
procedure TBaseChartForm.DoChart(vst: TVirtualStringTree; Title : string);
var
   ms : array of TBarSeries;
   sc, si : integer;
   data : PRiepilogo;
begin
   inherited;
   sc := 0;
   // Dimensiono l'array delle serie = Numero anni comparati
   SetLength(ms, vst.RootNodeCount);
   Chart1.Title.Text.Add(Title);
   node := vst.GetFirst;
   if not assigned(node) then exit;
   while node <> nil do
   begin
     data := vst.GetNodeData(node);
     if not assigned(data) then exit;
     if data.Tipo = trAnno then
     begin
      // Creo una nuova serie	
       ms[sc] := TBarSeries.Create(self);
       ms[sc].ParentChart := Chart1;
       ms[sc].Title := inttostr(data.Anno);
       Chart1.AddSeries(ms[sc]);
     end;
     if data.Tipo = trMese then
     begin
       for si := 0 to sc do
       begin
	// Cerco la serie relativa all'anno considerato (data.anno)
         if data.Anno = strtoint( ms[si].Title) then break;
       end;
       // Aggiungo il dato alla serie corrente
       ms[si].Add(data.Ricavo, inttostr(data.Anno) + '-' + 
inttostr(data.Mese));
     end;
     node := vst.GetNext(node);
   end;
   ShowModal;
end;
Ciao