Delphi: simulando um duplo clique usando SendMessage

Para simular um duplo clique do mouse num controle visual, usar a função SendMessage, passando como primeiro parâmetro o handle do controle, como no exemplo abaixo.

SendMessage(Memo1.Handle, WM_LBUTTONDBLCLK, 10, 10);