Maßeinheiten als Typen

[Ghostwalker]

Zitat von Uwe Raabe:

Zitat von Ghostwalker:

Nein, da es kein "class const" gibt.

Was würde denn dann eine class const Konstante von einer gemeinen const Konstante unterscheiden?

Delphi-Quellcode:

  TGewicht = Record
  private const
    GrammPerKilo = 1000;
    GrammPerTonne = 1000+GrammPerKilo;
    GrammPerMegat = 1000*1000*GrammPerTonne;
  End;

Ganz einfach.

Bei "private const" stehen die Konstanten nur in einer konkreten Instanz (sprich Variable) zur Verfügung.
Folglich (und das hat mir der Delphi-Compiler recht deutlich mitgeteilt) kann man sie so nicht in den
Operatoren verwenden.

Also hab ich mir ein Beispiel an Emba genommen und das ganze wie oben umgesetzt. Damit kann ich die Konstanten auch in den Operatoren verwenden.