Search found 707 matches

by Manuel Valdenebro
Tue Jul 01, 2014 8:51 am
Forum: FiveWin para Harbour/xHarbour
Topic: MIGRACION DE XHARBOUR A HARBOUR
Replies: 29
Views: 5067

Re: MIGRACION DE XHARBOUR A HARBOUR

Muchas gracias Postinelli
by Manuel Valdenebro
Mon Jun 30, 2014 7:31 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Antonio, ¡estoy inquieto!
Replies: 17
Views: 5782

Re: Antonio, ¡estoy inquieto!

Jose Vicente, Recientemente he pasado una aplicación importante desde xHarbour a Harbour. Logicamente, cualquier cambio trae complicaciones, en mi caso ha sido el tema de los Codepage. Pero una vez solucionado esto, el cambio de Harbour a xHarbour no ha sido demasiado complicado. Yo sigo trabajando ...
by Manuel Valdenebro
Sun Jun 29, 2014 9:42 am
Forum: FiveWin para Harbour/xHarbour
Topic: Error FIVEHC.LIB ANIGIF
Replies: 2
Views: 539

Re: Error FIVEHC.LIB ANIGIF

Gracias Antonio.
by Manuel Valdenebro
Sun Jun 29, 2014 5:31 am
Forum: FiveWin para Harbour/xHarbour
Topic: Error FIVEHC.LIB ANIGIF
Replies: 2
Views: 539

Error FIVEHC.LIB ANIGIF

En una aplicación antigua que corre perfectamente, he tratado de actualizar el compilador desde BCC55 a BCC582 y me saca los siguientes errores: Versión FWH 2008-Marzo y el xHarbour que venia con la licencia de FWH: Error: Unresolved external '__rwstd::__rw_stdexcept_NoNamedException' referenced fro...
by Manuel Valdenebro
Sat Jun 28, 2014 9:52 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Mapa caracteres Harbour
Replies: 8
Views: 2555

Re: Mapa caracteres Harbour

Harbour, a diferencia de xHarbour, abre por defecto las dbf con el codepage cp437 (inglés). Si luego cambiamos el CODEPAGE a otro idioma, entonces graba la información en ese fichero con el nuevo CODEPAGE. Esto crea problemas cuando queremos encriptar un campo de una dbf, con las funciones de FW enc...
by Manuel Valdenebro
Fri Jun 27, 2014 4:20 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Mapa caracteres Harbour
Replies: 8
Views: 2555

Re: Mapa caracteres Harbour

Manuel, Esto es algo propio de Harbour, y no de FWH, asi que lo más conveniente es que directamente publiques tu pregunta en el foro de usuarios de Harbour: https://groups.google.com/forum/#!forum/harbour-users Tal vez otro usuario pueda ayudarte aqui. Normalmente hacemos: REQUEST HB_CODEPAGE_ESWIN...
by Manuel Valdenebro
Fri Jun 27, 2014 7:10 am
Forum: FiveWin para Harbour/xHarbour
Topic: Mapa caracteres Harbour
Replies: 8
Views: 2555

Re: Mapa caracteres Harbour

Gracias Antonio. Voy a mirar en el foro de Harbour.
by Manuel Valdenebro
Fri Jun 27, 2014 5:52 am
Forum: FiveWin para Harbour/xHarbour
Topic: Mapa caracteres Harbour
Replies: 8
Views: 2555

Re: Mapa caracteres Harbour

En xHarbour, lo vengo haciendo de la siguiente forma: 1) Al inicio, cargo los módulos de los lenguajes REQUEST HB_LANG_ES REQUEST HB_LANG_DE REQUEST HB_LANG_EN REQUEST HB_LANG_FR REQUEST HB_LANG_PT REQUEST HB_LANG_IT REQUEST HB_CODEPAGE_ESWIN // para picture @! Ññ REQUEST HB_CODEPAGE_DEWIN // aleman...
by Manuel Valdenebro
Thu Jun 26, 2014 10:17 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Mapa caracteres Harbour
Replies: 8
Views: 2555

Mapa caracteres Harbour

En una aplicación que estoy convirtiendo de xHarbour a Harbour, me encuentro con la siguiente sorpresa: En una dbf, tengo un campo carácter, donde grabo una información. Esta información en un número encriptado con una función propia que posteriormente desencripto con otra función propia, como métod...
by Manuel Valdenebro
Thu Jun 26, 2014 9:36 pm
Forum: FiveWin para Harbour/xHarbour
Topic: MIGRACION DE XHARBOUR A HARBOUR
Replies: 29
Views: 5067

Re: MIGRACION DE XHARBOUR A HARBOUR

Antonio Linares wrote:
HB_FUNC( TW_GETDEFAULTSOURCENAME )
{
   hb_retl( TWAIN_GetNextSourceName( ( char * ) hb_parc( 1 ) ) );
}

Con este nuevo código, si compila perfectamente.

Muchas gracias.
by Manuel Valdenebro
Thu Jun 26, 2014 9:33 pm
Forum: FiveWin para Harbour/xHarbour
Topic: MIGRACION DE XHARBOUR A HARBOUR
Replies: 29
Views: 5067

Re: MIGRACION DE XHARBOUR A HARBOUR

Manuel, Has comparado el código fuente de la clase TGroup en versión 12.03 con la del 2008 que has usado ? Si las he comparado y hay muchas cambios, incluso varios métodos añadidos. Por eso, como la versión del 2008 funciona sin problemas, he añadido el módulo a la librería personal y solucionado.
by Manuel Valdenebro
Thu Jun 26, 2014 5:27 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Config xEdit..Harbour...(Solucionado)
Replies: 15
Views: 2704

Re: Config xEdit..Harbour...(Solucionado)

Antonio,

En la configuración de Postinelli, aparecen las librerias de Harbour gtWin y GTgui. En cambio, en samples\buildh.bat sólo aparece GTgui, aunque hay una linea comentada, para elegir entre gtGui y gtWin.

¿Es necesario incluir las dos o solamente gtgui?
by Manuel Valdenebro
Thu Jun 26, 2014 9:17 am
Forum: FiveWin para Harbour/xHarbour
Topic: MIGRACION DE XHARBOUR A HARBOUR
Replies: 29
Views: 5067

Re: MIGRACION DE XHARBOUR A HARBOUR

Si usas LABEL "" te muestra algún texto ó espacio ? El comportamiento es distinto desde código que desde recurso: En ambos casos, si no pones la etiqueta LABEL o la pones con dos comillas (sin espacio) no funciona. Es decir LABEL "" no funciona. 1) Desde código: Si pones un espa...
by Manuel Valdenebro
Thu Jun 26, 2014 5:12 am
Forum: FiveWin para Harbour/xHarbour
Topic: MIGRACION DE XHARBOUR A HARBOUR
Replies: 29
Views: 5067

Re: MIGRACION DE XHARBOUR A HARBOUR

Antonio, ya dí con la tecla. Tanto desde código como desde recursos, no se permite en GROUP omitir LABEL y que además tenga un contenido: ESTO NO FUNCIONA @ 34.0*nRalto, 5*nRancho GROUP oGrupo TO 130.9*nRalto, 190.0*nRancho ; OF oDlg TRANSPARENT PIXEL ESTO TAMPOCO @ 34.0*nRalto, 5*nRancho GROUP oGru...
by Manuel Valdenebro
Thu Jun 26, 2014 4:52 am
Forum: FiveWin para Harbour/xHarbour
Topic: mi funcion. dada una fecha devolver el rango de la semana
Replies: 13
Views: 1003

Re: mi funcion. dada una fecha devolver el rango de la semana

dFecha := CTOD("24/07/2014") nDia := DOW (dFecha) IF nDia > 1 .and. nDia < 7 msginfo("desde: " + dtoc(dFecha-(nDia-2)) + " hasta: " + dtoc(dFecha+(6-nDia))) ELSE msgstop (CDOW(dFecha), "Fecha no válida.") ENDIF Puedes convertirlo en una función y usar un array...