Verschiedene Datenformate im Array speichern

[Christian18]

Hallo,

ich habe verschiedene Datenformate. Ich bräuchte die funktion eines Arrays. Ist es möglichu verschiedene Datenformate in einem Array zu speichern???

hier meine daten:

x y a b c d
0 0 t t t t
0 1 f t t f
...
1 1 f f f f

[sniper_w]

Ja. Moglicherweise über RECORDS (wenn es gleichzeitig versiedene Datentypen geben muss) oder Variants.

Delphi-Quellcode:

 var a: array of Variant;
// oder

type MyType = record
   a : integer;
   b: string;
   c : double;
   end;

var myarray : array of MyType;

[Christian18]

Zitat von sniper_w:

Ja. Moglicherweise über RECORDS (wenn es gleichzeitig versiedene Datentypen geben muss) oder Variants.

Delphi-Quellcode:

 var a: array of Variant;
// oder

type MyType = record
   a : integer;
   b: string;
   c : double;
   end;

var myarray : array of MyType;

Hallo,

hast du vieleicht auchnoch ein kleines Beispiel wie auf die Felder zugreifen kann???

[sniper_w]

Delphi-Quellcode:

type MyType = record
   a : integer;
   b: string;
   c : double;
   end;

var myarray : array[0..9] of MyType;

//...
begin
 myarray[0].b := 'Hallo';
 myarray[0].a := 10;
 myarray[0].c := -23.4545;

 myarray[3].b := 'Hallo du da ?!!';
 myarray[2].a := 100011;
 myarray[7].c := -23435.46555545;

end;

[Christian18]

Zitat von sniper_w:

Delphi-Quellcode:

type MyType = record
   a : integer;
   b: string;
   c : double;
   end;

var myarray : array[0..9] of MyType;

//...
begin
 myarray[0].b := 'Hallo';
 myarray[0].a := 10;
 myarray[0].c := -23.4545;

 myarray[3].b := 'Hallo du da ?!!';
 myarray[2].a := 100011;
 myarray[7].c := -23435.46555545;

end;

ok danke

[dizzy]

Da hier wohl nur Zahlenwerte und einzelne Buchstaben vorkommen ist es einfach. Ein "array of array of Byte" wäre eine Variante, wobei du dann bei den Chars explizit umwandeln musst.
Ein anderer Weg wäre ein varianter Record:

Delphi-Quellcode:

type 
  TDataType = (dtNumber, dtChar);

  MyType = record
    case Typ: TDataType of
      dtNumber: (Zahl: Byte);
      dtChar  : (Buchstabe: Char);
  end;

So in etwa müsste es meine ich aussehen. (Hab selten mit varianten Records gearbeitet, und kanns mangels Delphi auch grad nicht testen...)

[Binärbaum]

Zitat von dizzy:

Ein anderer Weg wäre ein varianter Record:

Delphi-Quellcode:

type 
  TDataType = (dtNumber, dtChar);

  MyType = record
    case Typ: TDataType of
      dtNumber: (Zahl: Byte);
      dtChar  : (Buchstabe: Char);
  end;

So in etwa müsste es meine ich aussehen.

Man könnte auch gleich einen einfachen Byte-Array verwenden, wenn der Wechsel zwischen Char und Byte stets gleich ist, also wenn z.B. immer erst zwei Bytes kommen und dann vier Chars. Statt nun die Chars als solche zu speichern, speichert man deren Ordinalwerte und beim Lesen aus dem Array werden die Chars wieder mit Chr umgewandelt.

MfG
Binärbaum

[dizzy]

Diesen Teil hast du vergessen zu Quoten :

Zitat von dizzy:

Da hier wohl nur Zahlenwerte und einzelne Buchstaben vorkommen ist es einfach. Ein "array of array of Byte" wäre eine Variante, wobei du dann bei den Chars explizit umwandeln musst.