BCB4でTRichEditにWordBreakProcを指定したくて、

int MyWordBreakProc(LPTSTR lpch, int ichCurrent, int cch, int code)
{
return 0; // とりあえず
}

__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
SendMessage(RichEdit1->Handle, EM_SETWORDBREAKPROC, 0, (LPARAM)MyWordBreakProc);
}

こう書いたのですが、関数内にブレークポイントを設定しても
一向に呼び出されている気配がないんです。
何が悪いんでしょうか？