arraynamen in array - auflösen ?

[ChrisE]

Hallo,

das ist auch Klar. Du behauptest ungefähr das hier:

Delphi-Quellcode:

type
  PDaten = ^TDaten;
  Tdaten = record
              test1   : single;
              test2   : single;
           end;
//...
var
  Rohdaten: array of TDaten;
  Datenarray: array[1..3] of PDaten; // A

//wegen A geht nur Zugriff der Form
Datenarray[i]^.test1

Was du willst sollte eher so aussehen:

Delphi-Quellcode:

type

  Tdaten = record
              test1   : single;
              test2   : single;
           end;
  PRohdaten = ^TRohdaten;
  TRohdaten = Array of TDaten;
  Datenarray: array[1..3] of PRohdaten;
//...
var
  Rohdaten1: TRohdaten;
  Rohdaten2: TRohdaten;
  Rohdaten3: TRohdaten;
  Datenarray: array[1..3] of PRohdaten;
//...
  Datenarray[1]:=@Rohdaten1;
  Datenarray[2]:=@Rohdaten2;
  Datenarray[3]:=@Rohdaten3;
  for i:=0 to 10 do showmessage(floattostr(datenarray[1]^[i].test1));

Gruß, Chris

wobei i Hier NICHT bis 10 laufen darf