Mehrdimensionales Array an anderes anhängen

[mkinzler]

TeeChart funktioniert aus direkt mit Datenbanken

[Jumpy]

Length(array) liefert 0 bei einem leeren Array, wo SetLength noch nicht benutzt wurde. Somit geht ungefähr sowas:

Delphi-Quellcode:

OldLength:=Length(MyArray);
SetLength(MyArray,OldLength+ZeilenInCSV);
for i:=0 to ZeilenInCSV-1 do
  MyArray[OldLength+i]:=CSV.Zeile[i].Spalte[3].Value;

[Takeo]

Zitat:

Zitat von mkinzler (Beitrag 1268748)

TeeChart funktioniert aus direkt mit Datenbanken

Ja das hab ich auch gesehen, aber jetzt ist halt die Frage, ob es so einfach ist das als Datenbank zu machen, wenn man bisher noch nie damit gearbeitet hat? Oder gibt es irgendwo ein einfaches Tutorial, welches zeigt, wie man ne Datenbank anlegt, Daten hinzufügt und das ganze noch embedded macht?

Zitat:

Zitat von Jumpy (Beitrag 1268749)

Length(array) liefert 0 bei einem leeren Array, wo SetLength noch nicht benutzt wurde. Somit geht ungefähr sowas:

Delphi-Quellcode:

OldLength:=Length(MyArray);
SetLength(MyArray,OldLength+ZeilenInCSV);
for i:=0 to ZeilenInCSV-1 do
  MyArray[OldLength+i]:=CSV.Zeile[i].Spalte[3].Value;

Ok das ist doch schonmal gut. Und wenn mein Array mehrdimensional ist? Gibt length(MyArray) die Zeilen oder die Spaltenzahl zurück?

[Medium]

Bei Mehrdimensionalen Arrays gibt Length() immer die Länge der aktuellen Dimension im Argument zurück. (Mit Zeilen/Spalten haben Arrays übrigens nichts zu tun, das ist nur deine Interpretation ;))

Delphi-Quellcode:

var
  MyArray: array of array of Integer;
begin
  foo := Length(MyArray); // Länge der 1. Dimension
  foo := Length(MyArray[0]); // Länge der 2. Dimension
end;

Man muss es also so sehen, dass ein zweidimensionales Array im Grunde ein eindimensionales Array von weiteren eindimensionalen Arrays ist. Wenn man alle "sekundären" Arrays gleich lang macht (was man mit SetLength(MyArray, x, y) tut), dann reicht es die Länge eines der Elemente vom primären Array zu erfragen um die Länge aller sekundären zu erhalten.

Man kann aber auch sowas machen:

Delphi-Quellcode:

var
  MyArray: array of array of Integer;
begin
  SetLength(MyArray, 3);
  SetLength(MyArray[0], 2);
  SetLength(MyArray[1], 8);
  SetLength(MyArray[2], 7);
end;

Dann hat man quasi eine Tabelle, bei der jede Spalte eine unterschiedliche Anzahl von Zeilen hat (oder umgekehrt, je nach dem wie man es interpretiert eben). Dann müsste man für jedes primäre Array einzeln die Länge seines jeweiligen sekundären Arrays ermitteln. (In praktischem Einsatz sehe ich sowas aber sehr selten. Aber es wäre möglich!) Und man ist natürlich nicht auf nur 2 Dimensionen beschränkt. Da kann man echt witzige Dinge mit machen.

[Takeo]

Ok dann sind es halt die Dimensionen ;)
Ich ging halt davon aus, dass man ein zweidimensionales Array (was ich ja benötige) wie eine Art Matrix oder, wie du es auch einmal nanntest, Tabelle auffassen kann, da wird ja von Reihen und Spalten gesprochen.

Es wäre also sinnvoll die Anzahl der "Zeilen" (die Zeitwerte) in die 1. Dimension zu legen, also die variable Länge und in die 2. Dimension die Anzahl der "Spalten" (die verschiedenen Messreihen), die nur einmal gesetzt werden muss und beim anhängen immer gleich bleibt?

Delphi-Quellcode:

Hilfsarray := Getfile(Filepath); //fülle das Hilfsarray mit Hilfe einer Funktion, welche ein Array zurückgibt, mit den Werten  der CSV Datei
Oldlength := length(MyArray);
Setlength(MyArray, Oldlength + length(Hilfsarray), length(Hilfsarray[0]));

for i := 0 to length(Hilfsarray)-1 do begin
  for j := 0 to length(Hilfsarray[0])-1 do MyArray[Oldlength + i, j] := Hilfsarray[i,j];
end;

das müsste ja dann gehen, oder? Kann es grad leider nicht testen, da ich meine VM mit Delphi nicht zur Hand habe.

[Dejan Vu]

Noch prüfen, ob die Spaltenanzahlen kompatibel sind, aber ansonsten sollte das so passen.

[Bjoerk]

Mach aus der Getfile besser eine procedure.