Question about xBrowse

[Armando]

kindly friends:

With the code below I know the current value of the cell

Code: Select all  Expand view  RUN

:bOnChange  := { |oCol, uOldVal| VerSaldo(uOldVal) }
 

Now how do I know the new value after editing the cell?

I must compare the old content against the new content
and I must know if the new content is empty

With best regards

[nageswaragunupudi]

Now how do I know the new value after editing the cell?

Code: Select all  Expand view  RUN

oCol:Value

Notes:
Do not use this for validation. This is called when the modified data is already written and also if the old data is different from the new data written.
This codeblock is meant for taking consequential action after modification of data in the cell but not for validation.

[Armando]

Mr. Rao:

Thanks so much, I understood.

By the way, is it possible to paste what I have on the clipboard into a cell with just one mouse click?

Best regards

[Marc Venken]

Code: Select all  Expand view  RUN

   

 oBrwmail:bRClicked := { || placemail() }

function placemail
    cText = oClp:getText()  //  This is content of clipboard
    testmail->(dbappend())
    testmail->email = cText
    obrwmail:refresh()
return

You can also use the varput and do it in Xbrowse itself

[nageswaragunupudi]

Code: Select all  Expand view  RUN

   

 oBrwmail:bRClicked := { || placemail() }

function placemail
    cText = oClp:getText()  //  This is content of clipboard
    testmail->(dbappend())
    testmail->email = cText
    obrwmail:refresh()
return

You can also use the varput and do it in Xbrowse itself

Dear Friend.
With FWH you do not have to write long code like this at all.

[nageswaragunupudi]

By the way, is it possible to paste what I have on the clipboard into a cell with just one mouse click?

Yes.
Just by clicking Ctrl-V.

For this we first need to set

Code: Select all  Expand view  RUN

oBrw:lCanPaste := .t.

We can paste text into text fields and even images into Image fields.
All by just one click Ctrl-V.

Code: Select all  Expand view  RUN

function XbrPaste()

   local aData := { { "olga     ", MEMOREAD( "c:\fwh\bitmaps\olga1.jpg" ) }, ;
                    { "Two      ", "" }, { "Three      ", "" } }

   XBROWSER aData FASTEDIT SETUP ( ;
      oBrw:lCanPaste    := .t., ;
      oBrw:nRowHeight   := 100, ;
      oBrw:aCols[ 2 ]:cDataType:= "P" )

return nil

[Armando]

Mr. Rao:

Thanks a lot.

Regards