Controle Tab page

[Nascimento]

Amigos analizem o seguinte cenário:

tenho um tab com 3 pages
em cada page tem um textbox
quando inicio o aplicativo na primeira page o primeiro textbox ja entra em focus
como fazer para na page que eu clicar o textbox correspondente ja ficar em focus?

[Nascimento]

Amigos Consegui resolver, e tambem postar a solução, pq as vezes resolvemos nosso problema,
e esquecemos que podem ter amigos aqui que possam passar pelo mesmo tipo de problema
então solucionamos e esquecemos de postar como foi dada a solução pois bem sem mais delongas

Código: Selecionar todos

//no tab vc adiciona o controle on change(Page_change())

// PS Altere para seus controles claro rsrs

*-------------------------------------------------------------------------------
* deste modo a função page_change() vai saber em que page esta e em qual foco setar
*
Static Function Page_change()
  local n_value := GetProperty("Mcpagcx_form","tb_caipg","value") // pego o valor do tab para saber em qual page estou
  if n_value = 1
     DoMethod("Mcpagcx_form","tx_din_cpg","Setfocus")   // seto o foco para o controle que desejo na page que cliquei Óbvio
  else
	  DoMethod("Mcpagcx_form","tx_add_cpg","Setfocus")
  endif
Return Nil

// bom acho que ficou bem simples o entendimento!, qualquer coisa so falar que explico melhor