Pushbutton (de novo!)

[MARCELOG]

Olá companheiros,

o negócio é o seguinte:

O comando get...pushbutton tem o sistema "focus" onde é possível colocar um code block que é executado quando o objeto recebe ou perde o foco.
A documentação do comando na página do xHarbour informa que a instance variable "hasfocus", verdadeira(.t.) ou falsa(.f.), indica se o objeto está recebendo ou perdendo o foco respectivamente.
Todavia, não consigo obter a informação verdadeira (.t.).
Estou utilizando a seguinte expressão:

.....FOCUS {|X|IF(X:HASFOCUS(),ALERT("SIM"),ALERT("NÃO"))}

A mensagem NÃO, tanto recebendo como perdendo o foco é exibida.

Há algo de errado com o comando?

MGS

[Stanis Luksys]

Olá,

Tente substituindo isso:

.....FOCUS {|X|IF(X:HASFOCUS(),ALERT("SIM"),ALERT("NÃO"))}

por isso:

.....FOCUS {|X|IF(X:form.buttom.HASFOCUS(),ALERT("SIM"),ALERT("NÃO"))}

[culik]

Marcelo

O codigo para focus do push button e o seguinte

{|X|IF(X:hasfocus,ALERT("SIM"),ALERT("NÃO"))}

[]s
Luiz