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 DIALOG oDlg SIZE 900,700 PIXEL TRUEPIXEL  &nbsp ...

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

... 125;,; {"C0003", "Racion Papas Fritas"},; {"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 cualquier tecla ...

... 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 ...

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 should not execute when oCol:oEditGet itself is NIL.

Let ...

... 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() }, y falla al ...

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?

Dear RAO,

I think it would be better ...

Thank you for your reply.
use test2
? valtype(test2->a2) // "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

... xValue, lButton, lDirectAssign ) CLASS TXBrwColumn, de la siguiente forma:

case ::nEditType == EDIT_GET .or. ::nEditType >= EDIT_DATE if ::oEditGet != nil ::oEditGet:Assign&#40;&#41;//<--- Aniadir esta linea. Resuelve el problema de salir de la edicion con el mouse. si se lo coloca en ...

... 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 I am ...

... us under what situation the error is coming 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