Error al usar la teclas con BTNGET32

[acuellar]

Hola a todos

Necesito ayuda, me sale este error al usar la teclas con BTNGET32
Called from: TGET.PRG => TBTNGET:KEYDOWN(0)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: CONTROL.PRG => TCONTROL:HANDLEEVENT(0)
Called from: TGET.PRG => TBTNGET:HANDLEEVENT(0)
Called from: WINDOW.PRG => _FWH(0)
Called from: => DIALOGBOX(0)
Called from: DIALOG.PRG => TDIALOG:ACTIVATE(0)

Gracias por su ayuda

Saludos

Adhemar

[Adolfo]

Pon un pedazo del codigo de donde lo llamas....

Que #includes usas y que version dela BTNGET tienes

Desde Chile
Adolfo

[acuellar]

Estos son los includes
#include "FiveWin.ch"
#include "TSBrowse.ch"
#include "TSButton.ch"
#include "DtPicker.ch"
#include "BtnGet.ch" del 10/10/2004

La lib BTNGET32 esta compilada con xHarbour
REDEFINE BTNGET oDBf:CodUbic ID 103 OF oDlg1 PICTURE "@Z 999" WHEN lBdr;
VALID {|| Ubica->( dBSeek( StrZero(oDBF:CodUbic,3) ) ),;
iif( Ubica->( Eof() ), ( MsgStop( "La ubicacion NO EXISTE","Error..." ), .f. ), ;
( oSUbi:Refresh(),.T. ) ) } ;
RESOURCE "Buscar" ACTION (BuscaItem("Ubica",1,2,"Ubica","Ubica2"), oDlg1:aControls[5]:SetFocus())

REDEFINE SAY oSUbi VAR OemToAnsi(Ubica->UBICACION) ID 104 OF oDlg1 UPDATE

Costos->( dBSeek( oDBF:CCOSTOS ) )

REDEFINE BTNGET oDBF:CCOSTOS ID 105 OF oDlg1 WHEN lBdr;
VALID {|| Costos->( dBSeek( oDBF:CCOSTOS ) ), ;
iif( Costos->( Eof() ), ( MsgStop( "El Costo NO EXISTE","Error..." ), .f. ), ;
( oSCos:Refresh(),.T. ) ) } ;
PICTURE "@!" ;
RESOURCE "Buscar" ACTION (BuscaItem("Costos",1,2,"Centros","Centros2"), oFld:aDialogs[1]:aControls[1]:SetFocus())

REDEFINE SAY oSCos VAR OemToAnsi(Costos->CENTRO) ID 106 OF oDlg1 UPDATE

Esto con 16bit me funciona y con 32 no.

Gracias.

Saludos desde Bolivia

Adhemar

[Adolfo]

TE envio los fuentes de la BTNGET probada para xHarbour.

Revisa tu mail.

Desde Chile
Adolfo

[acuellar]

Gracias Adolfo

Ahora funcionan las teclas, y no sale el boton para llamar a la base,
Hay otra manera de llamar a una base desde un GET, para no usar el BTNGET

Saludos

Adhemar