Pequeña pregunta acerca TGraph

Pequeña pregunta acerca TGraph

Postby Raymundo Islas M. » Fri May 26, 2006 7:48 pm

Hola a todos

Estoy probando la clase TGraph de Arteaga, y todo va bien, el unico detalle que no puedo resolver, es como le hago para inicializar el arreglo de las series ??, ya le anduve buscando y nop :cry: no le encuentro.

Me explico, cuando defino la grafica le aplico una serie en cero, al procesar X funcio, y deseo actualizar la grafica, me aparece el valor de cero mas los nuevos valores, y si lo vuelvo a procesar, pues se van acumulando.


- Aqui esta en cero
Image

- Aqui con un proceso
Image

y aqui si sigo repitiendo el proceso
Image

El unico detalle es como inicializar los valores contenidos anteriormente, osease, vaciar la serie y volver a llenarla.

Muchas Gracias y Saludos
FWH 10.6 + xHarbour + Borland 582
User avatar
Raymundo Islas M.
 
Posts: 592
Joined: Tue Mar 14, 2006 11:34 pm
Location: Acapulco, Gro. MEXICO

Postby Raymundo Islas M. » Fri May 26, 2006 10:42 pm

Corregido !!

oGraph:aData := {}
oGraph:aSeries := {}

y Listo !!!!


Saludos
FWH 10.6 + xHarbour + Borland 582
User avatar
Raymundo Islas M.
 
Posts: 592
Joined: Tue Mar 14, 2006 11:34 pm
Location: Acapulco, Gro. MEXICO

Postby thefull » Mon May 29, 2006 11:21 am

Raymundo Islas M. wrote:Corregido !!

oGraph:aData := {}
oGraph:aSeries := {}

y Listo !!!!


Saludos

Bueno, segun que grafica este intentado poner, te va a cascar.
Mi consejo es que metas un method :

METHOD DelSerie( nSerie ) CLASS TGraph

ADEL( ::aSeries, nSerie )
ASIZE( ::aSeries, ( Len( ::aSeries ) - 1) )

ADEL( ::aData, nSerie )
ASIZE( ::aData, ( Len( ::aData ) - 1) )

ADEL( ::aSTemp, nSerie )
ASIZE( ::aSTemp, ( Len( ::aSTemp ) - 1) )

ADEL( ::aDTemp, nSerie )
ASIZE( ::aDTemp, ( Len( ::aDTemp ) - 1) )

ADEL( ::aYVals, nSerie )
ASIZE( ::aYVals, ( Len( ::aYVals ) - 1) )

ADEL( ::aYTemp, nSerie )
ASIZE( ::aYTemp, ( Len( ::aYTemp ) - 1) )

RETURN Len( ::aSeries )

De esta manera, puedes cargarte una serie sin afectar a las demas.
oGraph:DelSerie( 1 )
// Y añado otra.
oGraph:AddSerie( aSerie )

Lo que estoy viendo es que las leyendas las recorta y no sale correctamente , cuando es mayor de 7 caracteres.

Es que recien estoy luchando con esta ;-), y por eso te cuento, ejejej
Saludos
Rafa Carmona ( rafa.thefullARROBAgmail.com___quitalineas__)
User avatar
thefull
 
Posts: 731
Joined: Fri Oct 07, 2005 7:42 am
Location: Barcelona


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 60 guests