请教，如何在BCB中使用 wchar_t 类型的变量。(50分)

我在一程序中需要使用wchar_t变量，按如下方法大致如此

1: wchar_t * p = L"0000";
2: Edit1->Text.WideChar(p,4);
3: SaveData(p);

程序编译无问题，但是运行到到第3行时则会出错。
如果改成

SaveData(L"0001");

则可正常运行。
请教，在BCB中该如何使用此Edit1->Text中的内容。