Verhindern von Instanzierung eines Objekts mit Create

[himitsu]

Code:

type
  TMyClass = [color=#ff0000]record[/color]
    strict private
      class var
        FX: Integer;
    strict protected 

    // Note: accessors for class properties must be declared class static.

      class function GetX: Integer; static;
     class procedure SetX(val: Integer); static;
    public
      class property X: Integer read GetX write SetX;
     class procedure StatProc(s: String); static;
  end;

Und wie wäre es in soeinem Fall garnicht erst eine Klasse zu verwenden?

ein Record hat Erstens keine Instanzen und Zweitens hat er in Delphi auch keinen Constructor.