Record zum Teil als Konstante und Variable?

[himitsu]

VAR muß man nicht angeben, denn am Anfang einer Section (private/public/...) ist VAR der Standard

um eine Ebene zu sparen lasse ich die einrückung weg und für die Ordnung kommen meistens einzelne Gruppen in eine eigene Section

Delphi-Quellcode:

type
  TmyRecord = record
    String_1: String;
    String_2: String;
    const Boolean1 = True;
    const Boolean2 = False;
    const Boolean3 = True;
  end; 

  TmyRecord = record
  public
    const Boolean1 = True;
    const Boolean2 = False;
    Boolean3 = True;  // ABER ist auch eine CONST
  public
    String_1: String;
    String_2: String;
  end; 

  // ich mach es meistens so
  TmyRecord = record
  private const  
    Boolean1 = True;
    Boolean2 = False;
  public const  
    Boolean3 = True;
  public
    String_1: String;
    String_2: String;
  end; 

  // weil mir das zu blöd ist
  TmyRecord = record
  private
    const  
      Boolean1 = True;
      Boolean2 = False;
  public 
    const  
      Boolean3 = True;
  public
    String_1: String;
    String_2: String;
  end;

[NoGAD]

Zitat von himitsu:

VAR muß man nicht angeben, denn am Anfang einer Section (private/public/...) ist VAR der Standard

um eine Ebene zu sparen lasse ich die einrückung weg und für die Ordnung kommen meistens einzelne Gruppen in eine eigene Section

Delphi-Quellcode:

  // ich mach es meistens so
  TmyRecord = record
  private const
    Boolean1 = True;
    Boolean2 = False;
  public const
    Boolean3 = True;
  public
    String_1: String;
    String_2: String;
  end;

Danke!

Wo gilt denn public const überall?

[himitsu]

Überall. Public und Const ist ja getrennt,
aber der Übersicht halber versuche ich in einem Block nichts zu mischen, also entweder nur variablen und nur Konstanten.
Daher lässt sich das sehr gut in eine Zeile scheiben.

für Records ist die Liste dann auch recht einfach

Delphi-Quellcode:

private type
private const
private
public type
public const
public // das ist bei Records der Standard für die erste Zeile, wenn man nichts angegeben hat

[Redeemer]

Zitat von himitsu:

für Records ist die Liste dann auch recht einfach

Delphi-Quellcode:

private type
private const
private
public type
public const
public // das ist bei Records der Standard für die erste Zeile, wenn man nichts angegeben hat

strict private (in den drei Kombinationen) vergessen. Ergibt nur Sinn mit Eigenschaften und mit ausschließlich intern verwendeten Methoden, die durch Properties oder sichtbare Methoden aufgerufen werden.

Zitat von dummzeuch:

Das ließe sich aber mittels eines Konstruktors und ReadOnly-Properties lösen, genauso wie bei Klassen.

Nur bedingt, da Records keinen Standardkonstruktor haben.