como usar el BalloonTip

[lmpadron]

Hola amigos

en este post Chris me indica que use BalloonTip en ves de mensajes de dialogo y realmente cuando lo piensas tiene toda la razón, como ese post se había abierto por otra razón entonces abro este con la siguiente pregunta

Como uso el BalloonTip en c++ builder ?

Busque en internet y no encontré mucho excepto algunos ejemplo de como implementarlo sobre el TryIcon y aquí en el club no hay ningún post en c++ que trate el tema. Chris posteo un ejemplo pero esta escrito en Delphi y no he podido encontrar la forma de hacerlo en c++.

Empezado por Chris

Este sería el código Delphi para implementar lo que te digo:

Código Delphi [-]
procedure Form1.Edit1OnKeyPress(var Key: Char);
var
    BalloonTip: _tagEDITBALLOONTIP;
begin
    if (B > C) then
    begin
        Key := 0; // no aceptar el caracter ingresado
        
        // mostrar un mensaje sutíl al usuario 
        // indicandole que el problema.
        BalloonTip.cbStruct := SizeOf(BalloonTip);
        BalloonTip.pszTitle := 'B es mayor que C';
        BalloonTip.pszText := 'TODO: EXPLICAR POR QUE B NO PUEDE SER MAYOR QUE C';
        BalloonTip.ttiIcon := 4;

        SendMessage(Edit1.Handle,
                    EM_SHOWBALLOONTIP,
                    0,
                    Integer(@BalloonTip));        
    end;
end;

Tienes que agregar a la sección uses la unidad CommCtrl para hacer uso de los BalloonTips de Windows.

¿Alguien que pueda traducir este código?

Saludos!

Gracias de antemano por su ayuda