[MrDiG]

Вот топик нашёл:
http://www.programmersforum.ru/showthread.php?t=77918

Вроде как рабочий вариант для Notepad.

Код:

postmessage(FindWindowEx(FindWindow('notepad', nil), 0, 'Edit', nil),WM_LBUTTONDOWN,0,(x shl 16)+ y);
postmessage(FindWindowEx(FindWindow('notepad', nil), 0, 'Edit', nil),WM_LBUTTONUP,0, (x shl 16)+ y);

Но как узнать нужный хэндлер я так и не понял.