Pessoal estou tentando refinar meu log de erros e me surgiu uma ideia.
Usando um componente ApplicationEvents
Tenho uma rotina que grava o log de erro, nele eu pego o erro no E.Message
, e o componente Sender que gerou o erro, até ai beleza, acontece que as vezes um Objeto
não tem a propriedade Name e sim ClasseName, neste caso fica dificil identificar de onde partiu o erro, pra melhorar eu capturo o Form que estiver Ativo com "Screen.ActiveControl.UnitName
", mas as vezes o formulario ativo não é quem gerou o erro mas sim um que esta sendo criado por ele... nesse caso eu teria que pegar o Componente que gerou o erro e ir subindo a hierarquia, assim eu saberia qual percurso devo fazer pra simular o erro no desenvolvimento.
Também tem uma função acoplada a essa rotina que captura a tela no momento do erro, mas as vezes o delay que existe não captura exatamente onde o mouse estava, pois pode ser em um menu que ja fechou.
Ou seja, em resumo preciso percorrer a hierarquia de um Objeto, como posso fazer isso?
Complementando porque preciso da hierarquia, porque as vezes um componente esta dentro de um Panel->TabSheet->PageControl->Panel->Form
.