Alow, Rodolgo.
Coloque no começo de cada CLICK (ou valid) dos botões na barra de tarefas...
Please, retorne se esta solução funcionou, ok?
Urght, nem coloquei lá, nem testei porque não é o que preciso.
Veja: o meu povo aqui é meio invocado - o sistema tem que pegar na mãozinha
deles e ir levando com carinho, é um absurdo!
Sendo assim na ToolBar tenho um label que indica que classe está ativa
pra que eles saibam, antes de clicar, sobre o que o click será insidido.
Eu queria algo assim:
ClasseClientes.GotFocus:
thisform.oTBRPrinc.iFormIndex = 1
ClasseContatos.GotFocus:
thisform.oTBRPrinc.iFormIndex = 2
TBRPrinc.iFormIndex_assign:
this.lblAtivo.caption = "Operações no cadastro de "+ iif(this.iFormIndex = 1 "Clientes", "Contatos")
Entende? é isso que eu fiz aqui, mas ao voltar da classe Contato para a classe Cliente o GotFocus da classe Cliente não é executado e vai tudo pro chão.
Mas tudo bem, acho que vou colocar no GotFocus de cada campo da classe Clientes e tocar pra frente. Se descobrir algo, favor me informar.