Delphi: SendMessage

Gilberto Saraiva — Tue, 20 May 2008 01:01:07 +0000

Camaradas,

O SendMessage é uma função disponibilizada pela plataforma windows (API) que nos permite interagir sobre objetos Window, ou seja, todos os objetos que possuem Handle, seja esse handle de qual tipo for: HWND, HFILE, HMENU, HHOOK, HGLOBAL, HLOCAL, HINST e outros vários. Diante isso podemos entender que o acesso a certos objetos pode ser feito através da utilização dessa API.

{$EXTERNALSYM SendMessage}
function SendMessage(hWnd: HWND; Msg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;

Basicamente o SendMessage necessita apenas do Handle e da Mensagem ( Message ), os outros 2 parametros serão dependentes da Mensagem enviada.

Um exemplo:

  SendMessage(btn2.Handle, CN_COMMAND, BN_CLICKED, 0);

Envia uma mensagem do tipo CN_COMMAND para o btn2 (no nosso caso esse é um TButton) com o parametro BN_CLICKED que faz o TButton btn2 entender que se deve executar o procedimento de click.

Outro exemplo interessante:

  SendMessage(form1.Handle, WM_SETTEXT, 0, Integer(PChar('Novo Título')));

O código acima modifica o título do TForm form1 para o valor “Novo Título”.

A infinidade de coisas que dá pra se fazer com essa pequena API é incalculável.
Se quiser ver como é vasta a capacidade proponha-me um problema! Eu ficarei grato pelo desafio.

Abraço a todos

GSaraiva's Projects » HWND

Delphi: SendMessage