Thema: Delphi Case in Record

Einzelnen Beitrag anzeigen

Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#9

AW: Case in Record

  Alt 8. Okt 2015, 09:53
Ich meine mich zu erinnern, daß es auch so gehen könnte:

Delphi-Quellcode:
    DRIVE_LAYOUT_INFORMATION_EX = record
      PartitionStyle: DWORD;
      PartitionCount: DWORD;
      case Integer of
        0: (Mbr: DRIVE_LAYOUT_INFORMATION_MBR;
            partitionInfoEx: array of _PARTITION_INFORMATION_EX; );
        1: (Gpt: DRIVE_LAYOUT_INFORMATION_GPT
            partitionInfoEx: array of _PARTITION_INFORMATION_EX;);
    end;
Bin mir über die korrekte Syntax nicht im Klaren.

Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat