... aoGetsBas[12]:setpos(0) } aoGetsBem[04]:cToolTip := 'Informe a Descrição do BEM (Ex: Imóvel na Rua São Paulo, 23 - Bairro Centro)' Um abraço, Alexandre Pereira
... so a GET button (clause ACTION) with a WHEN .F. get the focus: http://forums.fivetechsupport.com/viewtopic.php?p=174059#p174059 Many thanks to Alexandre Pereira! * Fix: Class TUrlLink Method Destroy was missing so it was leaking bitmaps handles. Now it is ok. Thanks to Daniel!
... => TDIALOG:ACTIVATE( 286 ) Called from: P:\Desenv\DeclaCRED\DeclaCRED.prg => MAIN( 88 ) Una vez más, perdóname por la traducción. Alexandre Pereira
... embargo, cambié el TGet y así lo hizo: METHOD CreateButton() CLASS TGet ... ::oBtn:lCancel = .f. // Inicia FALSO para ser habilitado na GOTFOCUS (Alexandre Pereira) ... METHOD LostFocus( hCtlFocus ) CLASS TGet ... // Desabilitando quando sair if ! Empty( ::oBtn ) ::oBtn:lCancel := .f. endif ... ...