ENTER EN TSBROWSE
Publicado por JOSE (79 intervenciones) el 30/11/2005 23:51:38
lo que pasa que con esto:
oBrw1:SetBtnGet( 2, "Bar_New", { | oGet,cVar | cVar := LeerCodigo
(oDlg),oGet:cText(cVar),oGet:Refresh(),IF (! EMPTY(cVar),oGet:KeyDown
(VK_RETURN,0),)},16)
me sirve solo al dar click al BitMap pero tambien quiero que al dar
enter me haga lo mismo que el BitMap.
desde ya amigos Saludos
oBrw1:SetBtnGet( 2, "Bar_New", { | oGet,cVar | cVar := LeerCodigo
(oDlg),oGet:cText(cVar),oGet:Refresh(),IF (! EMPTY(cVar),oGet:KeyDown
(VK_RETURN,0),)},16)
me sirve solo al dar click al BitMap pero tambien quiero que al dar
enter me haga lo mismo que el BitMap.
desde ya amigos Saludos
Valora esta pregunta


0