FiveTech Software tech support forums

Excelente, Mr Rao !!!

Eso era lo que buscaba, muchas gracias.

It does not seem to be possible to use PopupBrowse with oEditGet of xbrowse. You may try something like this: #include "fivewin.ch"function XbrPopupBrowse()   local oDlg, oBrw, oEditGet   USE CUSTOMER   DEFINE ...

[url]
viewtopic.php?f=3&t=39319
[/url]

...    {"D0001", "Cola Cola Ligth"} }                            o:Edit( k )    PopupBrowse( aValue, o:oEditGet, Nil, 2 )    if o:oEditGet != Nil       o:oEditGet:End()    endif    Return Nil  Pero me genera el siguiente error, cuando presiono ...

... bPastBof y bPastEof Mira el nuevo ejemplo Balance.prg para comprobar el uso avanzado de bPastBof y bPastEof, * XBrowse: - En algún raro caso, oEditGet en la función EditGetKeyDown toma el valor nulo y provoca un error en tiempo de ejecución. Solucionado. viewtopic.php?f=3&t=38925 - Nueva ...

... * XBrowse: New DATA bPastBof See new example BALANCE.PRG to check advanced use of bPastBof and bPastEof * XBrowse: - In some rare cases, oEditGet in the function EditGetKeyDown is becoming nil and resulting in runtime error. fixed http://forums.fivetechsupport.com/viewtopic.php?f=3&t=38925 ...

The above error means that oCol:oEditGet is NIL when the function is called. But this is how this function is used   ::oEditGet:bKeyDown   := { | nKey | EditGetkeyDown( Self, nKey ) }  Logically the function ...

... problema está en bKeyDown de xBrowse. El error se produce en source\xbrowse.prg static function EditGetkeyDown( Self, nKey ) local lMultiGet := ::oEditGet:IsKindOf( "TMULTIGET" ) No en el nGet = AScan. Tengo una función que llamo en oBrowse:bKeyDown :={ | nKey | myfunction() ...

El problema está en source\xbrowse.prg

static function EditGetkeyDown( Self, nKey )

local lMultiGet := ::oEditGet:IsKindOf( "TMULTIGET" )

oCol:bOnPreEdit := {|| oCol:oEditGet:SelectAll()}

You need to modify xbrowse.prg. In the METHOD Edit() CLASS TXBrwColumn, search for "::oEditGet:SelectAll()" and comment out that line. I wonder what many programmers would prefer. The present default behavior of xbrowse or the new behavior preferred by you? ...

... // "M" m1:=test20>a2 ? m1 // "C" In xbrowse--- xcolumn-- method edit() , if ValType( uValue ) $ 'CM' ... ::oEditGet := TMultiGet():New(.." The uvalue must be "M" , I should fund other way to solve this. TKS! Shuming Wang

... lDirectAssign ) CLASS TXBrwColumn, de la siguiente forma:       case ::nEditType == EDIT_GET .or. ::nEditType >= EDIT_DATE         if ::oEditGet != nil            ::oEditGet:Assign()//<--- Aniadir esta linea. Resuelve el problema de salir de la edicion con el mouse. si se ...

... of different programmers. I understand. When I looked at the source I don't understand how the error could have happened because before it reach oEditGet:nLastkey it already passed oCol:oEditGet != nil It's a long time bug that I couldn't duplicate how it occur Yes. You are right. Same reason ...

... that would be halpful I understand. When I looked at the source I don't understand how the error could have happened because before it reach oEditGet:nLastkey it already passed oCol:oEditGet != nil It's a long time bug that I couldn't duplicate how it occur