procedure TForm1.Button1Click(Sender: TObject); begin Self := TForm1.Create(Owner); end;
(用德尔福6和2009测试)
为什么是自写而不是只读？>在哪种情况下这可能是有用的？
编辑：
>这是否也可能在Delphi棱镜？ (我想是的，见here)
更新：Delphi应用程序/使用自我分配的库：
> python4delphi
至于为什么，两个答案之一。要么是一个简单的监督，要么是Marco建议的：允许你将自己传递给一个var参数。
