Default-Wert für Record in Methode

[backdraft]

Hallo,

ist es nicht möglich einen Record vorinitialisiert in eine Methode zu übergeben?

Code:

type
  TMyRecord = record
    MyVar: string;
  end;

const
  cMyRecord : TMyRecord = (MyVar: 'Hello world');

type
  TMyClass = class
  public
    procedure HelloWorld(const aMyVar: TMyRecord = cMyRecord);
  end;

Meldet in der "procedure" Zeile:
[dcc32 Fehler] Unit1.pas(21): E2268 Parameter dieses Typs dürfen keine Standardwerte haben
[dcc32 Fehler] Unit1.pas(21): E2026 Konstantenausdruck erwartet

Ist meine Syntax falsch?

Danke
Oliver

[Stevie]

cMyConst ist eine typisierte Konstante und nicht benutzbar für default parameter Werte.

[himitsu]

Zitat von Stevie:

cMyConst ist eine typisierte Konstante und nicht benutzbar für default parameter Werte.

Leider, obwohl es ja eigentlich keinen Grund gibt, warum das nicht gehen sollte.


Es ginge hier nur der Parameter als Pointer und dann innen ein if not Assigned(aMyVar) then aMyVar := cMyRecord; oder das beliebte

Delphi-Quellcode:

procedure HelloWorld(const aMyVar: TMyRecord); overload;
procedure HelloWorld(); overload;

[sakura]

Als Alternative eine Methode ohne den Record-Parameter definieren, mit overload markieren und darin den Record initialisieren und die eigentliche Methode aufrufen.

......

[backdraft]

Beide Ideen hatte ich auch, mit dem Pointer und dem overload.
Aber ich dachte einfach, ich bin zu doof, weil ein Record doch zu Pascal gehört, seitdem es existiert.
Ich werde es dann per overload machen.

[himitsu]

Nee, geht leider nicht ... k.A. warum.

Delphi fügte ja auch nur die Werte direkt dort in den Aufrufen ein, wo die Parameter fehlen, drum wäre es nicht schwer sich die Referenz auf diese Konstante zu merken und sie an den Stellen zu verwenden.


Tipp: Für Property wurde das Default erweitert, denn "eigentlich" kann man nur ordinale Werte bis 32 Bit dort verwenden (Integer),
aber da gibt es nun was von Ratio.. mit Parametern.

Delphi-Quellcode:

property i: Integer read ... write ... default 123;

[Default('abc')]
property S: string read ... write ...;

http://docwiki.embarcadero.com/Libra...faultAttribute