풀다운 메뉴 등에 쓰인 힌트를 보여주는 간단한 데모입니다.
그냥 간단히 델파이로 된 것을 빌더로 바꿔서 제가 원하는 응용이 가능한가 점검하려는던 것인데
그냥 지워버릴려다 올립니다.
이런게 팁이 될려나...
그래도 안해본 사람에겐 도움이 될지도... ㅡㅡ;

폼에 메인메뉴 올리고 각 항목마다 힌트를 적당히 기재한 뒤 실행하면 됩니다.
힌트가 나타나면 계속 화면에 나타나 있는데 없애는 것은 각자 알아서... --;
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;

THintWindow *HintWin;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}

void __fastcall TForm1::DisplayHint(TObject *Sender)
{
    String HintStr;
    TRect  aRect;

    HintStr = Application->Hint;
    aRect.top = Mouse->CursorPos.y;
    aRect.left = Mouse->CursorPos.x;
    aRect.Right = aRect.Left + 100; // 각자 알아서 주시기를.
    aRect.Bottom = aRect.Top + 30;     // 이것두..
    HintWin->ReleaseHandle();
    HintWin->ActivateHint(aRect, HintStr);
}

//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
    Application->OnHint = DisplayHint;  // 메뉴에 힌트 날리는 이벤트 직접 만들어 주세요
    HintWin = new THintWindow(this);    // 힌트 윈도우 객체를 만듭니다.
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
    delete  HintWin;
}
//---------------------------------------------------------------------------