freeandnil函数执行的时候出现了问题，寻求帮助

[khalidwind]

TFileStream *Old = new TFileStream(Edit1->Text,fmOpenRead);
try
{
TFileStream *New = new TFileStream(Edit2->Text ,fmCreate);

try
{
New->CopyFrom(Old,Old->Size);
ShowMessage("SUC");
} __finally{
FreeAndNil(New);

}
} __finally{
FreeAndNil(Old);
}

结果执行到FreeAndNil(New)的时候就报错了。
怎么回事呢

[jishiping]

以前从来没有用过 FreeAndNil 这个函数。试了一下，应该这样使用：
FreeAndNil(&New); FreeAndNil(&Old);

[ksndyjs]

为什么
up