FiveTech Software tech support forums

Mario, también probé tu código, de la siguiente manera y funciona bien. //-------------------------function resulreplocal dbtmp1 := "dbhola"    local oDlg, oBrw, oCol    local oBtn1, oBtn2, oBtn3    USE &dbtmp1 shared new alias repos    DEFINE DI...

Hola Mario: Yo reproduje el código en mi equipo (solo la parte del xBrowse) y funciona bien la rutina que colocaste. Lo hice desde codigo en lugar desde recurso por causas obvias. Pero tal vez tengas algo que ver el recurso, o las variables globales que tengas definidas. Busca el hilo por ahí. Esper...

Francisco, aunque en este caso en especial no es necesario el uso del do while-enddo, copie parte de un código que había escrito (en el que no necesitaba editar los datos) y lo use como "template" para usarlo aquí, en el otro programa donde lo usaba me era útil, ya que mostraba una serie d...

...no se ven los datos de la columna "solicitados" (creo que porque son datos numéricos en el DBF) Efectivamente, si los datos en la columna son numericos, y el valor de estos es 0, no se verán porque así tienes definido el PICTURE: oCol:cEditPicture := "@Z 999,999.99" //no most...

Te he entendido
Lo que he querido decir es que si has probado a cambiar ese estilo de linea que tienes definido en el XBrowse

Good afetrnoon all, I got an xbrowse, built from a DBF file, it builds fine and I have only one column to be edited, the user clicks twice on the cell or hits enter and changes the value already there, when hitting enter again the value is not saved neither in the xbrowse, nor in the DBF file, a zer...

Gracias Cristóbal, pero el problema no es la edición (si tengo la línea como sugieres), el problema es que no salva los valores digitados por el usuario, puse un msgalert(xval,xval) y me muestra el dialogo con el valor cero, pero si edito el valor ya existente en esa celda y le doy enter no me salva...

Has probado a cambiar el estilo del xbrowse?

Code: Select all  Expand view

oBrw:nMarqueeStyle := MARQSTYLE_HIGHLROW
 

Para la edicion

Muchas gracias por tu respuesta, desafortunadamente el comportamiento sigue siendo el mismo, la única diferencia es que con estos cambios no se ven los datos de la columna "solicitados" (creo que porque son datos numéricos en el DBF) hasta que le doy doble click a la celda para editarlos, ...

Intenta de esta manera:   oCol = oBrw:AddCol()   // oCol:bStrData = { || transform(repos->solicita,"###,###.##") }    oCol:nDataStrAlign := 0    oCol:cHeader = "Solicitados"    oCol:nWidth = 90    oCol:bEditValue =...

Buenos días compañeros del foro, estoy experimentando la edición de datos directamente en un xbrowse, cuando construyo el xbrowse tengo una columna que ya tiene valores y que pueden ser editados por el usuario, se edita el valor, pero al darle enter no guarda los cambios, ni en el xbrowse, ni en el ...

Sorry, I make an mistake If I seek the number of invoide with SELECT PA PA->(DbSetOrder(1)) PA->( OrdScope(0, { || alltrim((nInvoice)) })) PA->( OrdScope(1, { || alltrim((nInvoice)) }) ) PA->(DbGoTop()) then I cannot edit each column I don't Know why ... I must seek it because I have two...

there were some errors there were "." instead of "," I think you can correct these small things. I am suggesting a method. You should take care of these small things at your end. as you can see I cannot see the last column Total ( but It show the right total footer) It is a very...

Dear Nages, http://img90.imageshack.us/img90/2883/invoice.jpg as you can see I cannot see the last column Total ( but It show the right total footer) then I cannot edit the column for sample the second column "PADESC" DEFINE DIALOG oFrmInvoice  TITLE "Invoice"    ...

Sorry Nages, But your script let me error ... abrowse ... there were some errors there were "." instead of "," aBrowse     :=  { { "PAITEM", i18n("Codice"),      nil,     50 }  ,;   ...