Fórum Sair de um Edit com condições no evento OnExit #225301

[b:8e3ffb47b4]Conto com ajuda de todos para solucionar um pequeno problema.
Coloquei uma condição no evento OnExit de um Edit que é assim:
If Edit1.Text = ´´ then
Begin
ShowMessage:=´Digite algo´;
Edit1.SetFocus;
End;
Ou seja se o Edit estiver vazio mostro uma mensagem e volto o foco para o edit, enquanto o usuário não digitar nada o foco fica no edit. Pois bem, mas e se o usuário quiser, por exemplo, cancelar a entrada de dados na tabela clicando no botão Cancelar? Só que o evento de cancelamento não será efetivado porque o Edit ainda está em branco. Se o usuário digitar algo aí sim ele poderá clicar no botão e cancelar a operação, mas isso seria incoveniente, o correto seria cancelar a operação mesmo o edit estando vazio, aí está o meu problema. Como faço para enviar o foco para o botão estando o edit vazio?
Espero respostas de quem puder me ajudar...

________________________________
Em terra de programador, quem tem Delphi é rei.[/b:8e3ffb47b4]