Klasse mit vordefinierter Variable?

[sh17]

mit properties kann man das per default-wert machen, geht dann IMO nicht private

Delphi-Quellcode:

  TLVSpectraII = class(TObject)
  private
    F_LastZellenzahl: Byte;
    procedure Set_LastZellenzahl(const Value: Byte);
  published
    property _LastZellenzahl : Byte read F_LastZellenzahl write Set_LastZellenzahl default 0;
  end;

oder kleiner

Delphi-Quellcode:

  TLVSpectraII = class(TObject)
  private
    F_LastZellenzahl: Byte;
  published
    property _LastZellenzahl : Byte read F_LastZellenzahl write F_LastZellenzahl default 0;
  end;