me he percatado que al imprimir un grafica pero en tipo: "puntos y lineas en 2d" truena el programa, con "barras y pie en 2d y 3d" no pasa, alguna sugerencia?
http://img119.imageshack.us/img119/6479 ... icafl3.jpg
gracias
Paco
Mmm... ya ví.
El culpable el pintado a doble buffer, se está perdiendo el recurso hPen. Pero no se como se come eso, ya Antonio me había comentado una solución pero no recuerdo.
ok, esperemos a ver que resulta de la memoria,
gracias, alfredo, de cualquier forma pues intentare mandarlo grabar a un bmp y luego imprimir ese bmp, de momento es lo que se me ocurre para darle solucion, aunque pues no la considero correcta.
por cierto hice unas pequeñas modificaciones en la clase para los graficos tipo pie, que se salia del recuadro y se comia parte de los subtitulos, por ahi me atrevi a moverle y parece que ya quedo...
salu2
paco
Te agradeceré me hagas llegar esos ajustes al pie. Saludos Paco.
enviada...
salu2
paco
Francisco, sería excelente que pudieras poner la clase corregida con un link de hyperupload en Utilities/Utilidades, para el beneficio de todos.
Buen trabajo,
que tal Jose,
no me trevi a publicarla ya que me quieria serciorar con el master de la lib que la revisara y le diera el vo.bo., ya que no me considero un aceptable modificador de clases, siendo asi estoy seguro que alfredo pronto la revisara y la podra liberar y que nos la publique por aqui. de cualquier forma si la necesitas te la envio con mucho gusto. 
salu2
Paco
Francisco Horta wrote:que tal Jose,
no me trevi a publicarla ya que me quieria serciorar con el master de la lib que la revisara y le diera el vo.bo., ya que no me considero un aceptable modificador de clases, siendo asi estoy seguro que alfredo pronto la revisara y la podra liberar y que nos la publique por aqui. de cualquier forma si la necesitas te la envio con mucho gusto.
salu2
Paco
Listo!
Aun hay detalles que podrían mejorarse, ya nuestro colega David desarrollo una lib, esto seguirá siendo una clase.
Disfrútenla.
IF (nAngle-nAngT)>1
hPen2 := CreatePen( PS_SOLID, 1 , 0 )
hOldPen2 := SelectObject( hMemCDC, hPen2 )
Pie( hMemCDC, aGRect[1], aGRect[2], aGRect[3]+1, aGRect[4]+1, ;
aPT2[2], aPT2[1], aPT1[2], aPT1[1] )
SelectObject( hMemCDC, hPen2 )
DeleteObject( hPen2 )
ENDIF
SelectObject( hMemCDC, hPen )
IF Len( aItems ) > 1
//MoveTo( hMemCDC, aPT1[1], aPT1[2] )
//LineTo( hMemCDC, ((aGRect[4]-aGRect[2]) / 2) + aGRect[2], ; // Center
// ((aGRect[3]-aGRect[1]) / 2) + aGRect[1] )
//MoveTo( hMemCDC, aPT2[1], aPT2[2] )
//LineTo( hMemCDC, ((aGRect[4]-aGRect[2]) / 2) + aGRect[2], ; // Center
// ((aGRect[3]-aGRect[1]) / 2) + aGRect[1] )
...Perfecto!, gracias Paco(s).
Si alguién más ha realizado cambios y considera que deben estar incluidos haganlos llegar a mi correo (abajo) y los incluiremos para todos.
Definitivamente una cabeza piensa menos que muchas.