Forum: Object-Pascal / Delphi-Language
by himitsu,
29. Mai 2012
Vergess jedesmal wie das MINENUMSIZE lautet ... also hier nochmal in Kurz
type
{$MINENUMSIZE 4}
_PARTITION_STYLE = (
PARTITION_STYLE_MBR,
PARTITION_STYLE_GPT,
PARTITION_STYLE_RAW);
{$MINENUMSIZE 1}
oder im Notfall einfach so
type
Forum: Object-Pascal / Delphi-Language
by himitsu,
29. Mai 2012
Sowas wie das "packed" selber hab ich noch nie gesehn,
aber das {$A...}, bzw. {$ALIGN ...} ist dort nicht immer so definiert, wie es in Delphi standardmäßig der Fall ist.
Und jenachdem von wo man den Code hat, gibt es in den C-Header entweder eine entsprechende Definition, bzw. dort existiert eine bestimmte "Vorgabe", in den übergeordneten Headern.
Auch die ENUMs stimmen nicht immer...
Forum: Object-Pascal / Delphi-Language
by himitsu,
29. Mai 2012
_CREATE_DISK = packed record
PartitionsStyle: PARTITION_STYLE;
case Integer of
0: (Mbr: CREATE_DISK_MBR);
1: (Gpt: CREATE_DISK_GPT);
end;
// oder
_CREATE_DISK = packed record