FiveTech Software tech support forums

...                oGet2:bLostFocus := {||MsgInfo(2)}    oDlg:Activate()Return ( Nil )  Cuando pulso enter en el get1 "primero" me evalúa el blostfocus de get2 y luego el blostfocus del get1, por lo que el resultado es primero MsgInfo(2) y luego MsgInfo(1). ...

... Sergio: Se me ocurre que pongas 2 say. Cada uno sobre el get correspondiente y lo ocultas... oSay1:Hide() y oSay2:Hide() Cuando toma el foco el get1, mostrarias el say1. oSay1:Show() y asi, igual con el otro. Solo una idea. Tambien podrías verificar que si esta Empty() el get1, haces oSay1:Hide(), ...

procure por GetActive ex:
GetActive():name == "get1"

... because you have to also re-enable some GETs if the user goes back and changes the GET or GETs that the disable depends on. For example: ...if GET1=10 .and. GET3="cat" then disable GET5, GET8, and GET9 But if the user then changes either GET1 or GET3, then GET5, GET8, and GET9 have ...

... En ese caso, al pulsar Tab, el cursor va de un get al otro, sin pasar por el xbrowse. Este proceso, aun cuando el orden definido en el .rc es get1, xbrowse, get2 Alguien tuvo este contratiempo?, como lo resuelven? gracias

Well, we can suppose the user know and remember the alphabet.

Hunter, you must use a say before every get with the accelerator key. A for Get1, B for Get2, etc.

... estaba en 16 bits Si los GETS los creo mediante comando sin Redefinir si adquieren ese aspecto http://img854.imageshack.us/img854/7264/get1.png Uploaded with ImageShack.us Gracias

que tal Master,
e recompilado el ejemplo y anexo imagenes.

antes de teclear flecha abajo


despues de teclear flecha abajo


esta raro
salu2
paco

...       ACTIVATE DIALOG oDlg CENTERED        CLOSE DATABASES    RETURN NIL Pretendo por ejemplo que en el get1 al teclear parte del código inicial, me abra un browse y vaya directamente a la clave o a la clave mas cercana Quiero utilizar F2 para los tres ...

... Called from TBUTTON:KEYDOWN(0) Called from TBUTTON:HANDLEEVEN(0) Called from DIALOGBOXI(0) Called from TDIALOG:ACTIVATE(0) Called from GET1(314) Called from PEDIR(239) Called from (b)DET_ENT(58) Called from TTABLA:NUEVO(787) Called from (b)INI_OPCION(431) Called from TTABLA:EJECUTA_OP(492) ...

... the fact when an Get is completed, the cursor do not cross the last character see the picture http://www.sitasoft.com/fivewin/screen/get1.png i did some change the TGET class to fix it, i leave a sample (.exe) with the modify. Please test the same sample without change I would ...

... ultimo caracter ) y despues BACKSPACE ( para el resto del contenido ) Para muestra una imagen http://www.sitasoft.com/fivewin/screen/get1.png he hecho algunas modificaciones a la clase TGET para que el cursor pase este ultimo caracter despues de completado el get, como muestra ...

Esta creado desde código, aquí tienes el código: DEFINE FONT oFont1 NAME "Times New Roman" Size 0,12 DEFINE FONT oFont2 NAME "Times New Roman" Size 0,12 BOLD DEFINE FONT oFont3 NAME "Times New Roman" Size 0,13 DEFINE WINDOW oWnd TITLE "Configuración" MENU BuildSinMenu() DEFINE BITMAP oBmp FILE IMAGE...

... ACTION CalcPrcVe( oPve_Prod, nPcu_Prod, nPve_Prod, lAppend ) SEM RIGHT http://www.johnson.oi.com.br/get1.jpg @ 110, 055 GET oPve_Prod VAR nPve_Prod PIXEL RIGHT OF oFldProd:aDialogs[ 1 ] COLOR CLR_GET1,CLR_GET2 SIZE 35, 10 BITMAP "" ...

Saludos, tengo un get con un valid REDEFINE GET oGet2 VAR cPassw ID 102 FONT oFont OF oDlg ; VALID (lValor:=VerUser(cPassw,::xTaq),If(lValor,(oBtn1:Click(),.T.),; (oGet2:nPos:=1,oGet2:Refresh(),.F.))) ; Picture '@KS6' COLORS CLR_GET1,CLR_GET2 Update ahora quiero que ese get, se alimente de un boton,...