FiveTech Software tech support forums

He compilado mi ultima aplicación en la que utilizo MultiThread con BCC582 y FWH 10.4 y me genera el siguiente error de ejecución cada vez que salgo de un dialogo o realizo alguna llamada a hb_gcall(.t.): Error description: Error BASE/1301 Object destructor failure: Reference to freed block Esta app...

Gracias por las respuestas.
Carles tienes razón si se habilita el botón X para finalizar la aplicación el VALID no se evalúa.

Gracias de nuevo.

Hola, En Windows Mobile 6: Sabe alguien como evitar salir de una aplicación si el usuario pulsa la X del TaskBar ?. Parece que la clausula VALID de Twindow siempre devuelve .t. y se acaba cerrando la aplicación. He probado ocultar el taskbar con la función ShFullScreen (una opción nada elegante), pe...

Me contesto a mi mismo:
Harbour tiene las funciones HB_BYTESWAPL,HB_BYTESWAPW,HB_BYTESWAPU,HB_BYTESWAPLL.

!!Es que Harbour tiene de todo!!

Hola, Al utilizar las funciones de Harbour, BIN2W, BIN2I, BIN2U, estas hacen la conversión desde el formato Big endian ( byte1 de mayor peso). Necesito hacerlo desde formato little endian ( byte 1 de menor peso ). ¿No tiene Harbour o FWH ninguna función que facilite esta conversión.? :?: Gracias de ...

Con esta aplicacion: http://deepxw.blogspot.com/2009/01/download-latest-version.html Se consigue modificar el numero de conexiones a medio abrir que en el caso de XP está limitado por defecto a 10. Lo he configurado en mi equipo a 500. La aplicación llega ha recibir hasta 4000 con un pico de 4 simul...

Ocurre el mismo problema con las funciones Inet de Harbour. He portado a Harbour sin el GUI de FHW la parte del servidor de mi aplicación, inicio un nuevo thread cada vez que se conecta un nuevo cliente. La aplicación funciona correctamente hasta que se han atendido unas 2000 peticiones de clientes,...

Gracias Daniel, queda claro.
Pero creando una CLASSDATA {} y añadiendo cada objeto creado, después pueden ser eliminados desde la misma clase liberando la memoria ¿no?

De eso hablo de crearlo sin asignarlo a ninguna variable, ejemplo: Function Main() local oWnd     DEFINE WINDOW oWnd       ACTIVATE WINDOW oWnd;     ON INIT Tobjeto():New(oWnd) return nil CLAS Tobjeto METHOD New(oWnd) METHOD End() ENDCLASS METHOD New(oWnd) CLASS Tobjeto local oTimer    := Ttimer():N...

Si creamos un objeto sin asignarlo a una variable , ¿como se libera la memoria que utiliza una vez este finaliza su ejecución?. En su metodo End() se puede hacer algo así: METHOD End()   self := nil return nil  Lo he probado, no genera ningún error, pero realmente no se si es correcto hacerlo de est...

Si funciona perfecto, pero GetSystemThreadID() llamado desde el objeto siempre retorna 1 a pesar de que hay varios objetos creados al mismo tiempo, por lo que parece que el objeto no se ejecuta desde un nuevo thread cada vez.

Este código: function Main() Local  oWnd       PUBLIC oApp        DEFINE WINDOW oWnd        ACTIVATE WINDOW oWnd MAXIMIZED;    ON INIT  ( oApp := Tapp():New( oWnd ),  StartThread(@StartServer(), oApp), WaitForThreads() )  ; return nil procedure StartServer(oApp ) local oSocket LOCAL pMutex   := HB_M...

Antonio,

¿Se puede con Harbour incluir objetos de FWH como TSocket o Ttimer dentro de un thread?

Si no entiendo mal, el multithreading con Harbour y parte de FWH funciona, pero Harbour no tiene soporte para sockets, o me equivoco?.

¿Alguien ha probado el soporte multithread en Xharbour?. ¿Es robusto y estable?.
Estoy pensando en migrar un proyecto con sockets de FWH a sockets de xHarbour con multithreads pero quisiera estar seguro de no encontrar problemas antes de iniciarlo.

Agradezco opiniones.