====== Descrição ======
Função para mostrar um balão de informações em determinado campo de texto.

====== Implementação ======

===== Delphi =====

<code delphi>
type TEditBalloonTip = packed record
  cbStruct: DWORD ;
  pszTitle: LPCWSTR ;
  pszText: LPCWSTR;
  ttiIcon: Integer;
end;

CONST
  ECM_FIRST         = $00001500;
  EM_SHOWBALLOONTIP = ECM_FIRST + 3;
  
procedure mostrarBalao(titulo, texto: PWideChar; icone: integer; controle : TEdit);
var
  editBalloonTip : TEditBalloonTip;
begin
  EditBalloonTip.cbStruct := SizeOf(TEditBalloonTip);

  EditBalloonTip.pszText  := Texto;

  EditBalloonTip.pszTitle := Titulo;

  EditBalloonTip.ttiIcon  := icone;

  SendMessageW(controle.Handle, EM_SHOWBALLOONTIP, 0,Integer(@EditBalloonTip));
end;
</code>

==== Parâmetros ====
titulo = Título que deverá aparecer no balão de informação\\
texto  = Texto que deverá aparecer no balão de informação\\
icone  = Ícone que deverá aparecer no balão de informação, de acordo com a seguinte tabela:\\
^Valor^Descricao         ^
|0    |Sem ícone         |
|1    |Informação Pequeno|
|2    |Aviso Pequeno     |
|3    |Erro Pequeno      |
|4    |Informação Grande |
|5    |Aviso Grande      |
|6    |Erro Grande       |
controle = Controle onde o balão de informação deverá aparecer