FiveTech Software tech support forums

... o vacía la celda de un xbrowse cuando su valor sea 0. el strzero no funciona, alguna sugerencia? Gracias En la declaración del XBrowse, donde especificas el campo, utiliza esta sintáxis: If( nElCampo = 0, " ", nElCampo ) o esta otra: If( nElCampo = 0, " ", TransForm( nElCampo, ...

Gracias a todos por la ayuda

Amigo Carlos muchas gracias, era exactamente lo que buscábamos.

Leandro mira si esto te funciona: #include "FiveWin.ch"PROCEDURE Main()   LOCAL oNode   LOCAL cFileName := "_Leandro.xml"   LOCAL cPath     := ""   cPath := "AttachedDocument -> cac:ReceiverParty -> cac:PartyTaxScheme -> cac:TaxScheme -> cbc:ID&...

// \SAMPLES\LEANDRO4.PRG#Include "FiveWin.ch"STATIC oWndMEMVAR wTEXTOFUNCTION Main()   LOCAL cXml, cRetID   cXml   := MemoRead( "LEANDRO.XML" )   cRetID := BuscaId( cXml )   XBrowse( cRetID )RETURN NILF...

Hola, Algo rapido puede ser esto, aunque lo ordoxo es usar funciones que convierten el xml en json: FUNCTION BuscaId(cXml)Local nAt, nPos1, nPos2, cIdnAt:= At("<cac:TaxScheme>", cXml)cXml:= SubStr(cXml, nAt)nPos1:= At("<cbc:ID>", cXml)n...

Hola Cristobal, gracias por responder Pero no es lo que necesito, ya que se retorna la primera coincidencia que encuentra, lo que necesitamos es podernos referir a un nodo en especifico por ejemplo: AttachedDocument -> cac:ReceiverParty -> cac:PartyTaxScheme -> cac:TaxScheme -> cbc:ID De...

Leando prueba a ver si es lo que necesitas: #include "FiveWin.ch"Function Main()   LOCAL cXml, oDoc, oNode, cNode, cNodeOrig   LOCAL cFileName := "xmltest.xml"   cNode := "OriginalNumber"   IF !MsgGet( "Label to search", "Label to search:"...

Buenas tardes para todos, En este momento logramos recuperar la información de las etiquetas de un archivo xml, recorriéndolo todo, pero esta pasando que en algunos casos la información viene organizada de manera diferente, el nodo esta, pero en una posición diferente ó un nodo cercano tiene el mism...

... CD Player real.. VIDEO DEMO: https://www.youtube.com/watch?v=Csy3ankLWkU Espero les sirva, ya que Fivewin y Harbour no hay funciones especificas para obtener estos datos, y si así lo considera el Maestro Antonio Linares que sea aporte para futuras versiones de Fivewin.. http://www.mediafire.com/file/eo5ujxs3vjs0f42/TMP3Info.rar/file ...

Hola amigo CADUCA estoy interesado en tu trabajo, realizo un ejercicio precisamente de colocar sobre un dibujo en áreas especificas algún tipo de info

Serias tan amable y me orientas un poco al respecto_???

De antemano GRacias
Jairo Barbosa

hk3dqc@gmail.com

... (in case if more than 1 sheet is open) that the program have to modify/use. Thanks Intenta asi... oHoja := oExcel:ActiveSheet() // SINO ESPECIFICAS QUE HOJA, TOMARA POR DEFECTO LA HOJA1 oExAngu:Sheets("COLUMNAS"):Select() // SELECCIONO Y ME CAMBIO A LA HOJA(pestaña) COLUMNAS ...

¿Es posible hacerlo esto? 1- Desde un xBrowse copiar al clipboard 1 linea. (no se si se puede copiar columnas especificas) 2- Del texto en el portapeles obtener la cadena deseada. Por ejemplo, en el clipboard tenemos copiado el texto "1103 1 1 S Roberto Alegria" Desde ...

El porcentaje del tamaño vertical a tener ese gradiente. Puedes especificar varios gradientes
y que porcentaje ocupa cada uno.

Si especificas el valor 1 es para que toda la altura del control se dibuje con ese único gradiente.

Paz,

Yo construyo FWH para Microsoft así:

"$(VCINSTALLDIR)"bin\lib.exe lib\Fiveh32.lib /OUT:lib\Fiveh32.lib modulo.obj

Imagino que si especificas ahí más de un OBJ se incluiran todos en la librería

... ) oExcel:WorkBooks:Add() oExcel:Sheets("Hoja2"):Select(); oHoja := oExcel:ActiveSheet() oHoja := oExcel:ActiveSheet() // SINO ESPECIFICAS QUE HOJA, TOMARA POR DEFECTO AL HOJA1 y para el formato de celda lo hago asi:    oHoja:PageSetup:Orientation := 2 // 1=xlPortrai(vertical), ...