FiveTech Software tech support forums

... 0 For i := 1 TO 30 nR, nC GET oGet[i] Var aGet[i] nR += 1 Next Pero este ejemplo no funciona. Todos los gets muestran el mismo valor 30, o sea, el balor final del For... next). Llevo un buen rato dándole vueltas pero estoy bloqueado. Alguien podría sugerirme cómo hacerlo? Rafael

Sorry :oops: Se me paso la linea donde se graba el valor que indica el color a usar : Static Function XXXXXXX() // para "llenar" la base o arreglo LOCAL nQ, nClrFlg := 0 FOR nQ := aKrdDts[4] TO aKrdDts[5] IF MOVSYS->( DbSeek( DtoS( nQ ) ) ) WHILE ...

... DbSeek(::uVal1,.T.) ) ENDIF IF (::cAlias) -> (EOF()) ::PRIM_REG := 0 ::ULTM_REG := 0 RETURN NIL ENDIF .... Como verás, si no hay valor de búsqueda (::uVal1) se va al GOTOP sino busca el primer registro ::uVal1 (suele estar al principio. Nunca me falló.

... que agregues un campo adicional ( normalmente uso un numerico de 1 digito ) y al momento de estar "llenando" la base a mostrar vas alternando el valor de ese campo ( normalmente uso 0-1 ) y solo cambias el codigo por esto : oLbx:nClrPane:={|| IIF(CLIENTES->TuCampo ==1,CLR_WHITE,CLR_LGRAY)} ...

... que agregues un campo adicional ( normalmente uso un numerico de 1 digito ) y al momento de estar "llenando" la base a mostrar vas alternando el valor de ese campo ( normalmente uso 0-1 ) y solo cambias el codigo por esto : oLbx:nClrPane:={|| IIF(CLIENTES->TuCampo ==1,CLR_WHITE,CLR_LGRAY)} ...

... Pero lo que quiero hacer es que en un listbox ordenado por un campo clave, me cambie el color alternativamente cuando cambie el valor de ese campo. A alguien se le ocurre por donde tirar? Un saludo, Manuel Aranda

... creo un Clon de un objeto, uno de sus métodos/message al estar accediendo a un área de trabajo concreta, necesito volver a definirlo con el nuevo valor del área; y claro lo que se me ocurre es eliminarlo y volverlo a crear con el nuevo valor. Saludos y gracias. Carlos G.

Olá Antonio.. Percebi que ao selecionar o primeiro dígito (SHIFT + SETA) e inserir outro, bagunça a máscara na tela, e fazendo parte no valor da variável. Exemplo: cSeek:=SPACE(08) @ 7, 8 GET cCep PICTURE '@R 99.999-999" Isso ocorre tanto @ get / ReDefine... Mas uma ...

... asi?.. digo esto solo porque al usar nombres de variables el codigo se ve mas entendible y a la hora de depurarlo pues se sabe de antemano el valor que trae la variable con solo ver el nombre. mi pregunta es: puedo usar tantas variables como necesite y no pasar por el problema de consumir ...

Elías,

En alguna parte de tu código debes estar reusando esa área de trabajo ó cerrándola.

Llama a MsgInfo( Select( "DEFINICIONES" ) ) antes de entrar en esa función y comprueba que te muestre un valor distinto a cero

Hola JoseLuis, Incluye la linea #xtranslate LL_PROJECT_LIST => 2, o bien, utiliza directamente el valor. En "C:\Archivos de programa\combit\LL12\Programmable Samples and Declarations\Alaska Xbase++" se encuentra cmbtll12.ch #include "FiveWin.ch" #include "cmbtll12.ch" ...

Antonio: Gracias por responder, solo necesito Mostrar el Browser con un arreglo de 6 variables: Folio, Fecha, Detalle,Cantidad,Valor Uni,Total. Tengo que poder modificar su contenido. Saludos, Miguel Miguel, > Como puedo manejar el Browser (Tcbrowse) con un arreglo de variables de ...

... que reconstruir la libreria nuevamente, pero me salieron unos warning, pero al parecer son solo advertencia que se declaro una variable con un valor y este no fue utilizado o algo parecido pero me cuasa cuidado la linea Warning W8065 adsfunc.c 189 MAKE Version 5.2 Copyright (c) ...

Puedes comprobar el valor que te devuelve WriteByte() que ha de ser .T.

... ya posicionados en los registros correspondientes, ¿Alguién podría mostrarme un trozo de código en el cual se vea como se muestra/captura el valor de un campo de cada una de ellas? ¿Y cómo se actualizarían estos campos? ¿Se deben atacar sus campos desde alias distintos? Si es así, la gestión ...