PRINCIPALE > LISTA DELLE AREE DI DISCUSSIONE > GRAFICA E AUDIO > MESSAGGIO

Eseguire una ricerca veloce nell' archivio delle risorse di Visual Basic Italia®: 

Preso dall'archivio...

Premere il pulsante sotto per accedere direttamente ad un articolo o ad un esempio preso in modo casuale dall'archivio.
Ultimo e-book pubblicato:

"INTRODUZIONE AI CSS"

Lo scopo del CSS language è quello di controllare lo stile dei vari elementi che concorrono a formare un
documento HTML.
Si può operare in tre modi collegamento ad un foglio di stile esterno;definizione degli stili all'inizio
del documento utilizzo della proprietà style all'interno di un Tag HTML (embedded style). Questo e-book introduttivo
servirà per apprendere tali nozioni fondametali dei fogli di stile.


Prezzo: € 0.0.

Presentazione:
REAL SOFTWARE RILASCIA LA VERSIONE 5.0 di REALbasic per Windows






Gorizia, 5 maggio 2003 - Active, distributore in esclusiva di REALSoftware, Austin, Tx, annuncia la disponibilità di REALbasic 5.0 per Windows, uno strumento per lo sviluppo semplice da usare che permette agli utenti Windows di tutti i livelli di creare applicazioni personalizzate e di compilarle sia per la piattaforma Windows che per quella Macintosh. [>>]

http://www.active-software.com

Contatti. Utilizzare l'email generica per domande relative al sito:
Porre domande relative al sito
oppure scrivere ad un responsabile di area.
Responsabile del sito: >Andrea Martelli
Responsabile area "Corso di VB":
> Giorgio Abraini

Messaggio



Conservazione scala durante MSChart.EditCopy
Lothian 25/07/2005
Difficoltà: Principiante

Ho definito un grafico XY avente in X la direzione del vento e in Y la quota altimetrica. Ho necessità che la scala delle X vari da 0 a 360 gradi con suddidivisioni ogni 90 gradi. Con la Sub che segue riesco correttamente a visualizzare il grafico secondo queste specifiche.

Public Sub Popola_Grafici_VV_T()
With frmGrafico_prof.cht_DV
.chartType = VtChChartType2dXY
.Plot.UniformAxis = False
.Plot.Axis(VtChAxisIdX).AxisTitle.Text = "Dir. Vento (°N)"
.Plot.Axis(VtChAxisIdY).AxisTitle.Text = "Qsls (m)"
.Plot.Axis(VtChAxisIdX).ValueScale.Auto = False
.Plot.Axis(VtChAxisIdX).ValueScale.Minimum = 0
.Plot.Axis(VtChAxisIdX).ValueScale.Maximum = 360
.Plot.Axis(VtChAxisIdX).ValueScale.MajorDivision = 4
End With
End Sub

A questo punto, ho necessità di salvare l'immagine del grafico in un file esterno .BMP, e pertanto utilizzo la Sub che segue.

Public Sub Salva_Grafico_Prof()
Clipboard.Clear
With frmGrafico_prof
.Pic_Tmp.Picture = LoadPicture()
.cht_DV.EditCopy
.Pic_Tmp.Picture = Clipboard.GetData()
.Pic_GIF.PaintPicture frmGrafico_prof.Pic_Tmp.Picture, 0, 0
End With
End Sub



Come risultato ottengo effettivamente un'immagine BMP del grafico, ma la stranezza sta nel fatto che la scala dei valori delle X mi compare arbitrariamente ridefinita con il massimo pari a 400 (gradi) e le suddivisioni pari a 100.
Tale ridefinizione dei valori della scala delle X avviene SOLO durante il metodo EditCopy, perchè il grafico rimane invece visualizzato sulla form che lo contiene coi valori correttamente variabili da 0 a 360 gradi.

Se prima dell'istruzione "cht_DV.EditCopy" mi faccio stampare il valore di
cht_DV.Plot.Axis(VtChAxisIdX).ValueScale.Auto, questo valore è correttamente = False.
Inoltre, se mi faccio stampare il valore di
cht_DV.Plot.Axis(VtChAxisIdX).ValueScale.Maximum,
questo è correttamente = 360.
Tuttavia, pare che il metodo "cht_DV.EditCopy" non senta ragioni.


Qualcuno potrebbe per favore darmi qualche suggerimento su come risolvere questo problema?
Grazie mille.