void __fastcall TForm1::FormCreate(TObject *Sender)
{
    if (IsDebuggerPresent())
    {
        Caption = "you are debugeed..., $:-)";
    }
}


API 함수니 그냥 사용하면 됩니다.
디버그 모드에서 실행하거나, 릴리즈 시켰는데
누군가가 디버그 모드로 접근한 경우 참을 돌립니다.

프로그램 코딩할때 리버스 엔지니어링도 염두에 둔다는....

ㅋ..ㅋ;