[RISOLTO] gblibChart x MD

[fsurfing]

Edit: avevo appena finito di inserire la torta che mi tocca rimettermi al lavoro per il dolce  hatecomputer hatecomputer

ps : ho cambiato leggermente la grafica della torta , poi dimmi se come la preferisci se con il bordo nero o con lo stesso colore delle fette

[dex]

avevo gia inserito il codice modificato della torta ma mi fa una strana linea.
da cosa dipende?

[fsurfing]

strano a me non lo fa.

prova a cancellare la classe linegraf nel tuo progetto e a ricopiaci quella dell' ultima versione.

se non va posso vedere il codice di caricamento dei dati che utilizzi?

[Ceskho]

Edit: avevo appena finito di inserire la torta che mi tocca rimettermi al lavoro per il dolce  hatecomputer hatecomputer

ps : ho cambiato leggermente la grafica della torta , poi dimmi se come la preferisci se con il bordo nero o con lo stesso colore delle fette

Il bordo nero è meglio..secondo me dovresti separare i colori con una sottile linea nera....

[dex]

la classe linegraf l'ho gia sostituita con l'ultima che hai postato

per il codice:

Codice: [Seleziona]

DIM sqlp AS String
  DIM Datar1, Datar2 AS String
  DIM graft AS NEW linegraf
DIM i, x AS Integer
DIM au AS Float


DIM Tvalori AS NEW Float[]
DIM Tva AS Float
  
  MyAnn = ComboBox2.text
  
  
x = 0  

  FOR EACH Msede 
  
  $conness.Close    
$conness.Type = "mysql" '  
$conness.Host = M1.MyHost '  
$conness.Name = Msede[x]
$conness.Login = "root"  
$conness.port = "3306"  
$conness.Password = "pass"   
$conness.Open 
  
 IF NOT $conness.Databases.Exist(Msede[x]) THEN
    Message.Error("Il database " & Msede[x] & " non esiste")
 ELSE
  
    
   
   Datar1 = MyAnn & "/01/01"      
   
   Datar2 = MyAnn & "/12/31"     
     
  sqlp = "SELECT * FROM contratti WHERE data >= '" & datar1 & "'" & " AND  data  <= '" & datar2 & "'"
      
      MyRS = $conness.Exec(sqlp)
  
   IF MyRS.Available THEN 
      FOR i = 1 TO MyRS.Count
      Au = Au + MyRS!grau750       
      MyRS.MoveNext
      NEXT
         
         au = au / 100
         Tva = Tva + au
         Tvalori.add(au)

   ENDIF  
   au = 0 
 
       
 ENDIF
INC x
NEXT 

    Tva = (100 / Tva)
   
'immissione dati 

     FOR i = 0 TO x - 1
      
          graft.PiePut((Tvalori[i] * Tva), Colore[i], Format((Tvalori[i] * Tva), "#####0.00") & " %")
        
     NEXT 
      
'disegno grafico
  
  PictureBox1.Picture = graft.MakePie("Grafico Sedi", PictureBox1.w, PictureBox1.h, Color.White, TRUE, 15)

è lo stesso codice che usavo prima con la torta a bordo nero.

[andy60]

Edit: avevo appena finito di inserire la torta che mi tocca rimettermi al lavoro per il dolce  hatecomputer hatecomputer

ps : ho cambiato leggermente la grafica della torta , poi dimmi se come la preferisci se con il bordo nero o con lo stesso colore delle fette

Il bordo nero è meglio..secondo me dovresti separare i colori con una sottile linea nera....

a me piace senza il bordo nero...ora come è settato nell'ultima release?

[fsurfing]

nell' ultima release non cè il bordo nero, ma colorato

[andy60]

nell' ultima release non cè il bordo nero, ma colorato

è la 0.13?

[Ceskho]

nell' ultima release non cè il bordo nero, ma colorato

Potresti inserire una proprietà di tipo BorderColored da impostare su TRUE o FALSE....

[fsurfing]

è la 0.13?

si quella

Potresti inserire una proprietà di tipo BorderColored da impostare su TRUE o FALSE....

non mi sembra il caso, direi o in un modo o nell' altro.. solo devo ancora decidere

[andy60]

è la 0.13?

si quella

Potresti inserire una proprietà di tipo BorderColored da impostare su TRUE o FALSE....

non mi sembra il caso, direi o in un modo o nell' altro.. solo devo ancora decidere

nera è peggio, imho