TPersistent über Findclass erzeugen und Constructor

[mkinzler]

Versuch es mal so:

Delphi-Quellcode:

TTest = class(TPersistent)
  private
    FX: Integer;
  public
    constructor Create; virtual; override;
    property X: Integer read FX write FX;
  end;

constructor TTest.Create;
begin
  inherited Create;
  FX:=5;
end;