Error al compilar con _gdiplus.vcx, Allowed DO nesting or expression evaluation level exceeded

674 views
Skip to first unread message

Ariel

unread,
Dec 3, 2013, 7:09:35 AM12/3/13
to publice...@googlegroups.com
Buenos dias, Tengo problemas al compilar mi proyecto por la clase _gdiplus.vcx, Me sale el error "Allowed DO nesting or expression evaluation level exceeded". sacando la clase gdiplus del proyecto desaparece el error, pero no puedo usar una funcion que corta imagenes que encontre en http://www.portalfox.com/index.php?name=News&file=article&sid=2223&mode=nested&order=0&thold=0. ¿Como puedo solucionar el problema? que el proyecto compile y la funcion funcione?


Desde ya muchas gracias

Ariel D'Alfeo
Córdoba Argentina


FUNCTION convertir_imagen
LPARAMETERS lcSource, lcDestination

LOCAL loImage AS GpImage OF _gdiplus.vcx
loImage = NEWOBJECT("GpImage", "_gdiplus.vcx")
loImage.CreateFromFile(lcSource)

LOCAL loCropped AS GpBitmap OF _gdiplus.vcx
lnWidth = loImage.ImageWidth
lnHeight = loImage.ImageHeight
loCropped = Crop(loImage, 0, 0, lnWidth / 2, lnHeight /2)
loCropped.SavetoFile(lcDestination + ".jpg","image/jpeg", "quality=70")


ENDFUNC

PROCEDURE Crop(toImage, x, Y, tnWidth, tnHeight, tnPixelFormat)
  IF VARTYPE(tnPixelFormat) = "L"
    tnPixelFormat = toImage.PixelFormat
  ENDIF

  DECLARE LONG GdipCloneBitmapAreaI IN GDIPLUS.dll ;
    LONG x, LONG Y, LONG nWidth, LONG nHeight, ;
    LONG PixelFormat, LONG srcBitmap, LONG @dstBitmap
  LOCAL lnNewBitmap
  lnNewBitmap = 0
  = GdipCloneBitmapAreaI(x, Y, tnWidth, tnHeight, ;
    tnPixelFormat, toImage.GetHandle(), @lnNewBitmap)
  LOCAL loNewImage
  loNewImage = NEWOBJECT("GpBitmap",HOME()+"ffc/_gdiplus.vcx")
  loNewImage.SetHandle(lnNewBitmap)
  RETURN loNewImage
ENDPROC

Jairo Miranda

unread,
Dec 3, 2013, 8:14:29 AM12/3/13
to publice...@googlegroups.com

Coloca en el Config.fp y en to programa principal

 

STACKSIZE = 1000

 

JM

Ariel D'Alfeo

unread,
Dec 3, 2013, 8:47:44 AM12/3/13
to publice...@googlegroups.com
jairo, agregue el archivo Config.fp (ya que no lo tenia en la carpeta de mi proyecto) y lo agregue al principio del main y lamentablemente sigue saliendo el error.



-- 
Ariel D'Alfeo
Córdoba, Argentina

Miguel Canchas

unread,
Dec 3, 2013, 8:53:33 AM12/3/13
to publice...@googlegroups.com

Jajajaja ya pues… no es Config.FP…… es Config.FPW---- todavía falta para el viernes—

 

MK

Ariel D'Alfeo

unread,
Dec 3, 2013, 9:02:06 AM12/3/13
to publice...@googlegroups.com
si también probé con el Config.FPW  y lo mismo, sigue el error.
el config.Fp es de fox 2.5

Jairo Miranda

unread,
Dec 3, 2013, 12:34:59 PM12/3/13
to publice...@googlegroups.com

Crea un programa con la linea

STACKSIZE = 1000

Y compila después la aplicación

JM

Cesar VfpImaging

unread,
Dec 3, 2013, 1:05:45 PM12/3/13
to Comunidad de Visual Foxpro en Español
Adicione a tu proyecto los archivos:

GdiPlus.H
GdiPlus_Locs.H

stos se encuentran en la misma carpeta FFC, donde encuentraste los _Gdiplus.vcx/vct

Recompile, y va funcionar

Saludos

Saludos,

Cesar
__________________________________________________________________
Por favor, no envíen emails o mensajes privados en los foros solicitando por soporte.






2013/12/3 Jairo Miranda <sandrae...@gmail.com>

Cesar VfpImaging

unread,
Dec 4, 2013, 9:48:41 AM12/4/13
to Comunidad de Visual Foxpro en Español
Funciono ?

Saludos,

Cesar
__________________________________________________________________
Por favor, no envíen emails o mensajes privados en los foros solicitando por soporte.






2013/12/3 Cesar VfpImaging <cch...@gmail.com>

Ariel D'Alfeo

unread,
Dec 5, 2013, 7:16:01 AM12/5/13
to publice...@googlegroups.com
si cesar, compila bien, much�simas gracias!!.
disculpa que no te confirme, pero ayer fue un d�a complicado en c�rdoba y no trabajamos.

-- 
Ariel D'Alfeo
C�rdoba, Argentina


El 04/12/2013 11:48, Cesar VfpImaging escribi�:
Funciono ?

Saludos,

Cesar
__________________________________________________________________
Por favor, no env�en emails o mensajes privados en los foros solicitando por soporte.


2013/12/3 Cesar VfpImaging <cch...@gmail.com>
Adicione a tu proyecto los archivos:

GdiPlus.H
GdiPlus_Locs.H

stos se encuentran en la misma carpeta FFC, donde encuentraste los _Gdiplus.vcx/vct

Recompile, y va funcionar

Saludos

Saludos,

Cesar
__________________________________________________________________
Por favor, no env�en emails o mensajes privados en los foros solicitando por soporte.


2013/12/3 Jairo Miranda <sandrae...@gmail.com>

Crea un programa con la linea

STACKSIZE = 1000

Y compila despu�s la aplicaci�n

JM

�

De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Ariel D'Alfeo
Enviado el: martes, 3 de diciembre de 2013 9:02


Para: publice...@googlegroups.com
Asunto: Re: [vfp] Error al compilar con _gdiplus.vcx, Allowed DO nesting or expression evaluation level exceeded

�

si tambi�n prob� con el Config.FPW� y lo mismo, sigue el error.

el config.Fp es de fox 2.5


El 03/12/2013 10:53, Miguel Canchas escribi�:

Jajajaja ya pues� no es Config.FP�� es Config.FPW---- todav�a falta para el viernes�

�

MK

�

�

De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Ariel D'Alfeo
Enviado el: martes, 03 de diciembre de 2013 08:48 a.m.
Para: publice...@googlegroups.com
Asunto: Re: [vfp] Error al compilar con _gdiplus.vcx, Allowed DO nesting or expression evaluation level exceeded

�

jairo, agregue el archivo Config.fp (ya que no lo tenia en la carpeta de mi proyecto) y lo agregue al principio del main y lamentablemente sigue saliendo el error.





-- 
Ariel D'Alfeo
C�rdoba, Argentina


El 03/12/2013 10:14, Jairo Miranda escribi�:

Coloca en el Config.fp y en to programa principal

�

STACKSIZE = 1000

�

JM

�

De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Ariel
Enviado el: martes, 3 de diciembre de 2013 7:10
Para: publice...@googlegroups.com
Asunto: [vfp] Error al compilar con _gdiplus.vcx, Allowed DO nesting or expression evaluation level exceeded

�

Buenos dias, Tengo problemas al compilar mi proyecto por la clase _gdiplus.vcx, Me sale el error "Allowed DO nesting or expression evaluation level exceeded". sacando la clase gdiplus del proyecto desaparece el error, pero no puedo usar una funcion que corta imagenes que encontre en http://www.portalfox.com/index.php?name=News&file=article&sid=2223&mode=nested&order=0&thold=0. �Como puedo solucionar el problema? que el proyecto compile y la funcion funcione?



Desde ya muchas gracias

Ariel D'Alfeo

C�rdoba Argentina




FUNCTION convertir_imagen
LPARAMETERS lcSource, lcDestination

LOCAL loImage AS GpImage OF _gdiplus.vcx
loImage = NEWOBJECT("GpImage", "_gdiplus.vcx")
loImage.CreateFromFile(lcSource)

LOCAL loCropped AS GpBitmap OF _gdiplus.vcx
lnWidth = loImage.ImageWidth
lnHeight = loImage.ImageHeight
loCropped = Crop(loImage, 0, 0, lnWidth / 2, lnHeight /2)
loCropped.SavetoFile(lcDestination + ".jpg","image/jpeg", "quality=70")


ENDFUNC

PROCEDURE Crop(toImage, x, Y, tnWidth, tnHeight, tnPixelFormat)

� IF VARTYPE(tnPixelFormat) = "L"
��� tnPixelFormat = toImage.PixelFormat
� ENDIF

� DECLARE LONG GdipCloneBitmapAreaI IN GDIPLUS.dll ;
��� LONG x, LONG Y, LONG nWidth, LONG nHeight, ;
��� LONG PixelFormat, LONG srcBitmap, LONG @dstBitmap
� LOCAL lnNewBitmap
� lnNewBitmap = 0
� = GdipCloneBitmapAreaI(x, Y, tnWidth, tnHeight, ;
��� tnPixelFormat, toImage.GetHandle(), @lnNewBitmap)
� LOCAL loNewImage
� loNewImage = NEWOBJECT("GpBitmap",HOME()+"ffc/_gdiplus.vcx")
� loNewImage.SetHandle(lnNewBitmap)
� RETURN loNewImage
ENDPROC

�







-- 
Ariel D'Alfeo
C�rdoba, Argentina

Carlos Miguel FARIAS

unread,
Dec 5, 2013, 7:38:00 AM12/5/13
to Grupo Fox
Complicado? Sobreviviste!!!


El 5 de diciembre de 2013 09:16, Ariel D'Alfeo <ariel...@gmail.com> escribió:
si cesar, compila bien, muchísimas gracias!!.
disculpa que no te confirme, pero ayer fue un día complicado en córdoba y no trabajamos.

-- 
Ariel D'Alfeo
Córdoba, Argentina


El 04/12/2013 11:48, Cesar VfpImaging escribió:
Funciono ?

Saludos,

Cesar
__________________________________________________________________
Por favor, no envíen emails o mensajes privados en los foros solicitando por soporte.


2013/12/3 Cesar VfpImaging <cch...@gmail.com>
Adicione a tu proyecto los archivos:

GdiPlus.H
GdiPlus_Locs.H

stos se encuentran en la misma carpeta FFC, donde encuentraste los _Gdiplus.vcx/vct

Recompile, y va funcionar

Saludos

Saludos,

Cesar
__________________________________________________________________
Por favor, no envíen emails o mensajes privados en los foros solicitando por soporte.


2013/12/3 Jairo Miranda <sandrae...@gmail.com>

Crea un programa con la linea

STACKSIZE = 1000

Y compila después la aplicación

JM

 

De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Ariel D'Alfeo
Enviado el: martes, 3 de diciembre de 2013 9:02


Para: publice...@googlegroups.com
Asunto: Re: [vfp] Error al compilar con _gdiplus.vcx, Allowed DO nesting or expression evaluation level exceeded

 

si también probé con el Config.FPW  y lo mismo, sigue el error.

el config.Fp es de fox 2.5


El 03/12/2013 10:53, Miguel Canchas escribió:

Jajajaja ya pues… no es Config.FP…… es Config.FPW---- todavía falta para el viernes—

 

MK

 

 


Enviado el: martes, 03 de diciembre de 2013 08:48 a.m.
Para: publice...@googlegroups.com
Asunto: Re: [vfp] Error al compilar con _gdiplus.vcx, Allowed DO nesting or expression evaluation level exceeded

 

jairo, agregue el archivo Config.fp (ya que no lo tenia en la carpeta de mi proyecto) y lo agregue al principio del main y lamentablemente sigue saliendo el error.





-- 
Ariel D'Alfeo
Córdoba, Argentina


El 03/12/2013 10:14, Jairo Miranda escribió:

Coloca en el Config.fp y en to programa principal

 

STACKSIZE = 1000

 

JM

 

De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Ariel
Enviado el: martes, 3 de diciembre de 2013 7:10
Para: publice...@googlegroups.com
Asunto: [vfp] Error al compilar con _gdiplus.vcx, Allowed DO nesting or expression evaluation level exceeded

 

Buenos dias, Tengo problemas al compilar mi proyecto por la clase _gdiplus.vcx, Me sale el error "Allowed DO nesting or expression evaluation level exceeded". sacando la clase gdiplus del proyecto desaparece el error, pero no puedo usar una funcion que corta imagenes que encontre en http://www.portalfox.com/index.php?name=News&file=article&sid=2223&mode=nested&order=0&thold=0. ¿Como puedo solucionar el problema? que el proyecto compile y la funcion funcione?



Desde ya muchas gracias

Ariel D'Alfeo

Córdoba Argentina




FUNCTION convertir_imagen
LPARAMETERS lcSource, lcDestination

LOCAL loImage AS GpImage OF _gdiplus.vcx
loImage = NEWOBJECT("GpImage", "_gdiplus.vcx")
loImage.CreateFromFile(lcSource)

LOCAL loCropped AS GpBitmap OF _gdiplus.vcx
lnWidth = loImage.ImageWidth
lnHeight = loImage.ImageHeight
loCropped = Crop(loImage, 0, 0, lnWidth / 2, lnHeight /2)
loCropped.SavetoFile(lcDestination + ".jpg","image/jpeg", "quality=70")


ENDFUNC

PROCEDURE Crop(toImage, x, Y, tnWidth, tnHeight, tnPixelFormat)

  IF VARTYPE(tnPixelFormat) = "L"
    tnPixelFormat = toImage.PixelFormat
  ENDIF

  DECLARE LONG GdipCloneBitmapAreaI IN GDIPLUS.dll ;

    LONG x, LONG Y, LONG nWidth, LONG nHeight, ;

    LONG PixelFormat, LONG srcBitmap, LONG @dstBitmap

  LOCAL lnNewBitmap
  lnNewBitmap = 0

  = GdipCloneBitmapAreaI(x, Y, tnWidth, tnHeight, ;

    tnPixelFormat, toImage.GetHandle(), @lnNewBitmap)
  LOCAL loNewImage

  loNewImage = NEWOBJECT("GpBitmap",HOME()+"ffc/_gdiplus.vcx")

  loNewImage.SetHandle(lnNewBitmap)
  RETURN loNewImage
ENDPROC

 





Reply all
Reply to author
Forward
Message has been deleted
0 new messages