Konstantendef. für array of TMyRecord

[Ares]

Hallo!

Ich habe folgende Typen deklariert:

Delphi-Quellcode:

  TMyEnum = (mnOne, mnTwo);
 
  TMyInfo = record
    str1: String;
    str2: String;
    num : TMyEnum ;
  end;

  TMyInfos= array of TMyInfo;

Ich würde nun gerne eine Konstante vom Typ TMyInfos definieren. Nur wie genau geht das?

Delphi-Quellcode:

const
   myInfos: TMyInfos = ((('test1a'),('test1b'),(mnOne)),(('test2a'),('test2b'),(mnTwo)));

Auf diese Art und Weise funktioniert es leider nicht. Der Compiler meckert, wegen des Kommas hinter ('test1a'), er erwartet ein Semikolon. Ich habe verschiedene Varianten ausprobiert, es aber nicht geschafft, etwas gültiges aufzubauen. Habe ich einen Fehler gemacht (wo) oder ist solch eine Konstantendefinition generell nicht möglich?

Besten Dank
Ares

[Hawkeye219]

Hallo Ares,

mit dynamischen Arrays ist diese Art der Definition leider nicht möglich, mit statischen Arrays geht es so:

Delphi-Quellcode:

type
  TMyEnum = (mnOne, mnTwo);

  TMyInfo = record
    str1 : String;
    str2 : String;
    num  : TMyEnum;
  end;

  TMyInfos = array [0..1] of TMyInfo;

const
   myInfos : TMyInfos = (
     (str1: 'test1a'; str2: 'test1b'; num: mnOne),
     (str1: 'test2a'; str2: 'test2b'; num: mnTwo)
   );

Gruß Hawkeye