topic-9475

Board index FiveWin para Harbour/xHarbour xBrowse validar e atualizar célula?

Posts: 80

Joined: Thu Nov 29, 2007 02:01 PM

xBrowse validar e atualizar célula?
Posted: Fri Jan 04, 2008 05:10 PM

Antonio, usando a xbrowse não estou conseguindo atualizar o conteudo de uma célula, ex:

obRW:aCols[1]:bOnPostEdit := {|o,x| aprod[ obRW:nArrayAt,1] := x }
obRW:aCols[1]:bStrData := { || trans(aprod[ obRW:nArrayAt,1],'999') }
obRW:aCols[1]:bEditValue:= { || aprod[ obRW:nArrayAt,1] }
obRW:aCols[1]:nEditType := EDIT_GET
obRW:aCols[1]:bEditValid := {|oGet| Seekproduto(oget) }

STATIC Function Seekproduto(oget)

local ubuffer:= oGet:Value()

if ! existe_prods(ubuffer)
// aqui preciso atualizar o valor de ubuffer, como fazer?
// algo assim oget:=0
return (.f.)
endif

return(.t.)

Rossine

Posts: 344

Joined: Tue Oct 11, 2005 11:33 AM

xBrowse validar e atualizar célula?
Posted: Mon Jan 07, 2008 11:55 AM

Olá,

Tente isto:

Code: Select all Collapse

STATIC Function Seekproduto(oget) 

local ubuffer:= oGet:Value() 

if ! existe_prods(ubuffer) 
   oGet:varput( 0 )
   oGet:refresh()
   return (.f.) 
endif 

return(.t.)

Abraços,

Rossine.

Obrigado, Regards, Saludos

Rossine.

Harbour and Harbour++

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

xBrowse validar e atualizar célula?
Posted: Mon Jan 07, 2008 12:48 PM

Revisa fwh\samples\mallorca.prg

Que ha sido modificado y probado a fondo en FWH 8.01, por lo que es distinto y funciona distinto del que se incluye en FWH 7.12

regards, saludos

Antonio Linares
www.fivetechsoft.com

FWHISHOW

Posts: 80

Joined: Thu Nov 29, 2007 02:01 PM

xBrowse validar e atualizar célula?
Posted: Mon Jan 07, 2008 01:57 PM

GRATO

FiveTech Support Forums

Continue the discussion