drei dimensionales dynamisches Array oder Record verwenden

[eassy]

hallo zusammen,

ich stehe mal wieder vor einem problem:

zur zeit habe ich mein programm mit einem drei dimensionalen dynamischen array aufgebaut.
diese möchte ich aber abändern, da das sehr unübersichtlich ist und dauernd messwerte
dazu kommen.

mein array sieht folgendermaßen aus
werte: array of array of array of string; Aufbau des array:
[0,0,0] = wertname1
[0,0,1] = wertname1
[0,1,0] = Datum + Uhrzeit (z.b. 23.03.2005 16:55:39)
[0,1,1] = wert (z.b 2)
[0,2,0] = Datum + Uhrzeit (z.b. 23.03.2005 16:56:39)
[0,1,1] = wert (z.b 2,5)
usw.
[1,0,0] = wertname2
[1,0,1] = wertname2
[1,1,0] = Datum + Uhrzeit (z.b. 23.03.2005 16:55:39)
[1,1,1] = wert (z.b. 44,58)
[1,2,0] = Datum + Uhrzeit (z.b. 23.03.2005 16:56:39)
[1,2,1] = wert (z.b. 40,99)

jetzt meine frage, kann man das auch irgendwie als record aufbauen?
wäre das sinnvoll oder hat vielleicht jemand eine anderen idee?

ich bin über jede hilfe dankbar.

gruß
eassy

[sniper_w]

Ganz einfach:

Delphi-Quellcode:

type 

TMyRecord = record
// alles was du brauchst, z.b
  Name : string;
  alter : integer;
  HatKinder : Boolean;
// alles was du brauchst
end;

TMyArray = array of TMyRecord;

var MyArray : TMyArray;

..
begin
 SetLength(MyArray, 10); // von 0 bis 9
 MyArray[1].Name := 'smith';
 MyArray[1].Alter := 33;
 MyArray[1].HatKinter := False;

end;

[eassy]

hallo,

wenn ich dich richtig verstehe kann ich dann
auch folgendes machen:

Delphi-Quellcode:

TWerte = record
  DatumUhrzeit: TDateTime;
  Wert: Double;
end;

TDaten = record
  Name: String;
  Zeitpunkt: array of TWerte;
end;


TMyArray = array of TDaten;

var MyArray : TMyArray; 

.. 
begin 
SetLength(MyArray, 10); // von 0 bis 9 

end;

Welcher Vorteil hat ein Record bezüglich einem dynamischen Array?
Braucht ein Record weniger Speicherplatz?

[sniper_w]

Zitat:

wenn ich dich richtig verstehe kann ich dann
auch folgendes machen:

Genau.

Zitat:

Welcher Vorteil hat ein Record bezüglich einem dynamischen Array?

"Falsche" Frage. Eine Array kann von irgend einem Datatyp sein, d.h., auch könnte es eine array of TMyRecord geben.

Zitat:

Braucht ein Record weniger Speicherplatz?

Noch eine "Falsche" Frage.
Eine Record braucht sowiel Platz wie die Summe von einzelner Felder in Record.
D.H.

Delphi-Quellcode:

TMYr = record
a:char;
i:integer;
end;

Sizeof(tmyr) = 5; --> SizeOf(Integer)+SizeOf(Char);

Eine Array braucht--> Typ * Length

[himitsu]

Zitat:

Welcher Vorteil hat ein Record bezüglich einem dynamischen Array?

Und in 'nen Record kann man auch verschiedene Typen aufnehmen, außerdem ist der manchmal auch übersichtlicher

Delphi-Quellcode:

Var A: Array[0..1] of Integer;

Var B: Record
    Anzahl, Position: Integer;
  End;

// Also, bei

A[0] := 10;
A[1] := 3;

// weiß keiner was [0] und [1] ist, aber wenn man dagegen

B.Anzahl := 10;
B.Position := 3;

// sieht...

Man kann also nicht sagen, dass eines der Beiden besser ist ... es kommt halt immer auf die Verwendung an.

Es wird ja wohl(hoffentlich) Keiner, in dem folgendem Beispiel, den Record verwenden?

Delphi-Quellcode:

Var A: Array[1..1000] of Integer;

Var B: Record
    Wert1: Integer;
    Wert2: Integer;
    Wert3: Integer;
    ...
    Wert999: Integer;
    Wert1000: Integer;
  End;

PS: Eine Array braucht--> SizeOf(Typ) * Length + 4 der Zeiger auf den Speicherplatz der Arraydaten ^^