相关疑难解决方法(0)

在Delphi中,我希望能够创建一个与类关联的私有对象,并从该类的所有实例中访问它.在Java中,我使用:

public class MyObject {
    private static final MySharedObject mySharedObjectInstance = new MySharedObject();
}

或者,如果MySharedObject需要更复杂的初始化,在Java中我可以在静态初始化程序块中实例化并初始化它.

(你可能已经猜到了......我知道我的Java,但我对Delphi很新...)

无论如何,我不希望每次创建MyObject实例时都实例化一个新的MySharedObject,但我确实希望可以从MyObject的每个实例访问一个MySharedObject.(它实际上是日志记录,这促使我试图解决这个问题 - 我正在使用Log4D,我希望将TLogLogger存储为具有日志记录功能的每个类的类变量.)

在Delphi中做这样的事情最好的方法是什么？