focar em determinado campo em page?

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

pena
Usuário Nível 3
Usuário Nível 3
Mensagens: 331
Registrado em: 06 Jul 2004 18:08
Localização: CACHOEIRA DO SUL-RS

focar em determinado campo em page?

Mensagem por pena »

Boa noite, como faço ao clicar em outra page ele focar em determinado campo deste page, fiz assim mas nao funfou

Código: Selecionar todos

       PAGE 'Outros' ;
          @ 10,080 TEXTBOX T_Vendedor             ;
                        WIDTH 060                      ;
                        VALUE cVendedor                ;
                        TOOLTIP 'Informe o Vendedor'   ;
                        FONT 'Arial' SIZE 09           ;
                        FONTCOLOR BLACK BOLD           ;
                        NUMERIC INPUTMASK 99999       

                       Frm_clientes.T_Vendedor.Setfocus
     
Avatar do usuário
Toledo
Administrador
Administrador
Mensagens: 3133
Registrado em: 22 Jul 2003 18:39
Localização: Araçatuba - SP
Contato:

focar em determinado campo em page?

Mensagem por Toledo »

Amigo, use ON CHANGE na TAB:

Código: Selecionar todos

DEFINE TAB Tab_1 AT 5,5 WIDTH 100 HEIGHT 100 VALUE 1 ON CHANGE {|| Setar_campoPage()}
Ai na função Setar_campoPage() você verifica qual PAGE está selecionando e define o campo que será focado.

Código: Selecionar todos

Func Setar_campoPage()
Local nTab:=Frm_clientes.Tab_1.Value
if nTab=1
  Frm_clientes.T_Vendedor.Setfocus
elseif nTab=2
  Frm_clientes.T_OutroCampo.Setfocus
elseif nTab=3
  Frm_clientes.T_etc.Setfocus
endif
Return Nil
Abraços,
Toledo - Clipper On Line
toledo@pctoledo.com.br
Harbour 3.2/MiniGui/HwGui
Faça uma doação para o fórum, clique neste link: http://www.pctoledo.com.br/doacao
pena
Usuário Nível 3
Usuário Nível 3
Mensagens: 331
Registrado em: 06 Jul 2004 18:08
Localização: CACHOEIRA DO SUL-RS

focar em determinado campo em page?

Mensagem por pena »

bah, perfeito Toledo, obrigado
:{
Responder