operator new를 오버라이드 할려고 해봤는데 호출이 아예 안되네요


class TSomeClass : public TObject
{
public:
    __fastcall TSomeClass(){}
    void * operator new(size_t s)
    {
        OutputDebugStringA("called....");  <===== 호출이 전혀 안됨
    }
}

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    TSomeClass *p = new TSomeClass();

}

방법좀 알려주세요