amigo tengo este codigo y me sale un error al seleccion la la columna EDIT_LISTBOX
REDEFINE XBROWSE oBrw ID 400 ;
HEADERS "Cuentas","Fecha de "+CRLF+"Vencimiento","Peridodo","Valor";
JUSTIFY AL_CENTER,AL_CENTER,AL_CENTER,AL_CENTER;
FIELDSIZES 110,110,130,80 ;
ARRAY aConvenios LINES CELL cols{ 1,2,3,4 } OF oDlg
for n := 1 to Len( oBrw:aCols )
oCol := oBrw:aCols[ n ]
if n ==2
oCol:nEditType := EDIT_DATE
Elseif n == 3
oCol:nEditType := EDIT_LISTBOX
oBrw:aCols[3]:aEditListBound := {"EFECTIVO", "TARJETA"}
oBrw:aCols[3]:aEditListTxt := {"EFECTIVO", "TARJETA"}
oCol:bOnPostEdit:= { |o,x,n| If( n != VK_ESCAPE, oBrw:aRow[o:nArrayCol] := x, ) }
Elseif n == 4
oCol:nEditType := EDIT_GET
oCol:bOnPostEdit:= { |o,x,n| If( n != VK_ESCAPE, oBrw:aRow[o:nArrayCol] := x, ) }
Endif
oBrw:aCols[4]:nDataStrAlign:= AL_LEFT
oBrw:nHeaderLines:= 2
next
ERROR:
Application
===========
Path and name: C:\SYSTEMA\TV_CABLE\TVCABLE.Exe (32 bits)
Size: 1,186,304 bytes
Compiler version: xHarbour 1.2.3 Intl. (SimpLex) (Build 20130326)
FiveWin Version: FWHX 12.08
Windows version: 6.1, Build 7601 Service Pack 1
Time from start: 0 hours 0 mins 15 secs
Error occurred at: 09-02-2018, 11:51:20
Error description: Error BASE/1004 Class: 'NIL' has no exported method: NLASTKEY
Args:
[ 1] = U
Stack Calls
Called from: => NLASTKEY( 0 )
Called from: C:\SYSTEMA\TV_CABLE\PRG\new_xbrowse.prg => TXBRWCOLUMN:POSTEDIT( 8370 )
Called from: C:\SYSTEMA\TV_CABLE\PRG\new_xbrowse.prg => (b)TXBRWCOLUMN:SHOWBTNLIST( 8291 )
Called from: .\source\classes\WINDOW.PRG => TWINDOW:LOSTFOCUS( 2899 )
Called from: .\source\classes\CONTROL.PRG => (b)TCONTROL:TCONTROL( 170 )
Called from: => TCONTROL:LOSTFOCUS( 0 )
Called from: .\source\classes\LISTBOX.PRG => TLISTBOX:LOSTFOCUS( 297 )
Called from: .\source\classes\CONTROL.PRG => TLISTBOX:KILLFOCUS( 1079 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1687 )
Called from: .\source\classes\LISTBOX.PRG => TLISTBOX:HANDLEEVENT( 570 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3177 )
Called from: => DIALOGBOX( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 270 )
Called from: C:\SYSTEMA\TV_CABLE\PRG\winges204.prg => CREACONVENIOS( 552 )
Called from: C:\SYSTEMA\TV_CABLE\PRG\winges204.prg => (b)WINGES204( 182 )
Called from: .\source\classes\BUTTON.PRG => TBUTTONBMP:CLICK( 163 )
saludos
