2 Variablen selber länge unterschiedlichen Typs auf selber Speicheradresse

[Stefan1286b]

Ja, genau das ist es.

Delphi-Quellcode:

  TBDataRead = packed record
    w1: WORD;
    w2: WORD;
    i1: SMALLINT;
    i2: SMALLINT;
  end;
  
  TArrayOfWordRead = array [0 .. 3] of WORD;



var
 LData : TBDataRead;
 LBuffer : TArrayOfWordRead absolute LData;

Jetzt stellt sich nur noch die Frage ob es möglich ist ein Feld in einer Klasse so zu deklarieren. Erster versuch ergab eine Fehlermeldung.
[dcc64 Fehler] uThreadBusInterface.pas(81): E2029 ';' erwartet, aber Bezeichner 'absolute' gefunden

Delphi-Quellcode:

  TBDataRead = packed record
    w1: WORD;
    w2: WORD;
    i1: SMALLINT;
    i2: SMALLINT;
  end;
  
  TArrayOfWordRead = array [0 .. 3] of WORD;


  TBDBThreadBusInterface = class(TBDBThread)
  private
    LData : TBDataRead;
    LBuffer : TArrayOfWordRead absolute LData;
  end;