verschiedene Datentypen speichern ?

[Sharky]

Hai Urba,

wie Luckie schon vorgeschlagen hat würde ich das mit einem Stream lösen. Das könnte dann z.B. So aussehen:

Delphi-Quellcode:

type 
  TBsp = Packed Record
    a : String[255];  // Sonst geht es Imho nicht
    b : Byte;
    c : Int64;
    d : Word;
    e : Single;
  end;

var
  a : array [1..10000] of TBsp;

// Alle Daten aus dem Array in eine Datei speichern.
procedure TForm1.Button1Click(Sender: TObject);
var
  ndx : Integer;
  stream : TMemoryStream;
begin
  stream := TMemoryStream.Create;
  try
    for ndx := Low(a) to High(a) do  // Alle Records im Array durchlaufen
    begin
      stream.Write(a[ndx],Sizeof(TBsp));  // Jeden Record in den Stream kopieren
    end;
    stream.SaveToFile('c:\meinedaten.dat');  // Stream speichern
  finally
    stream.Free;
  end;
end;