TDate/TDateTime in Filestream speichern

[Antigo]

danke für die Antowrten, ich habs jetzt so probiert:

Schreiben

Delphi-Quellcode:

var
  date:TDate;
  time:TDateTime;
begin  
  ...
  ...
  //Alarm////
  //Alarm ein?
  Stream.Write(Notizen[i].chkAlarm, SizeOf(Notizen[i].chkAlarm));
  //Sound ein?
  Stream.Write(Notizen[i].chkAlarmSound, SizeOf(Notizen[i].chkAlarmSound));
  //Date1
  date:=Notizen[i].DateTimePicker1.date;
  Stream.Write(date, SizeOf(date));
  //Date2 Uhrzeit
  time:=Notizen[i].DateTimePicker2.Time;
  Stream.Write(time, SizeOf(time));
  ...
end;

soweit alles ok
Lesen:

Delphi-Quellcode:

var
  date:TDate;
  time:TDateTime;
begin  
  ...
  ...
  //Alarm////
  //Alarm ein?
  Stream.Read(bool, SizeOf(bool));
  Notizen[i].chkAlarm.Checked:=bool;
  //Sound ein?
  Stream.Read(bool, SizeOf(bool));
  Notizen[i].chkAlarmSound.Checked:=bool;
  //Date1
  Stream.read(date, SizeOf(date));
  Notizen[i].DateTimePicker1.date:=date;
  //Date2 Uhrzeit
  beep; //<<-- hier wird der Fehler Ungültige Gleitkommaoperation angezeigt. Gemeint ist wohl der vorherige Befehl
  Stream.read(time, SizeOf(time));
  Notizen[i].DateTimePicker2.Time:=time;
  ...
end;

Jo und beim Lesen bekomme ich eine Ungültige Gleitkomma Operation. Warum auch immer -_-

Ich bitte um Hilfe