Z80 Simulator

[Flocke]

Mach's so, dann kannst du dir die Pointer sparen:

Delphi-Quellcode:

type
  TZ80Regs = record
    case integer of
    0: ( reg8:  array [0 .. 3] of byte; );
    1: ( reg16: array [0 .. 1] of word; );
  end;

Die Typen BYTE und WORD sind übrigens immer 8 bzw. 16 Bits lang.