Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.270 Beiträge
 
Delphi 10.4 Sydney
 
#9

Re: "C" Strukturen in Delphi verwenden

  Alt 26. Jun 2008, 12:30
Hallo,

zuerst mal fehlt dir in der struct Namen noch ein

int iCount

sonst weisst du nicht, wie viele im Array sind.

Zum Zugriff würde ich einen Hilfspointer benutzten.

Delphi-Quellcode:
type
  TTInfo: packed record
    name: array[0..100] of Char;
    zah1: Integer;
  end;
  PInfo = ^TInfo;

var
  P: Pointer;
  MyPInfo: PInfo;
begin
 // 1. Element
  P:= PInfo(Namen.namen);

 // Zugriff
  PInfo:= P;
  PInfo^.zahl // Zugriff

 // 2. Element
  P:= PInfo(Namen.namen+SizeOf(TInfo)); // noch + 1 , enfach mal probieren
  PInfo:= P;
  PInfo^.zahl // Zugriff
Falls Delphi bei den Zeigern meckert, nimm statt Pointer PChar.


Heiko
Heiko
  Mit Zitat antworten Zitat