Einzelnen Beitrag anzeigen

Dax
(Gast)

n/a Beiträge
 
#2

Re: fortlaufende werte in datei speichern

  Alt 29. Okt 2004, 12:46
Am einfachsten geht das mit einem Delphi-Referenz durchsuchenTFileStream:

1) Du erstellst beim Programmstart einen TFileStream
2) Die eingehenden Werte werden mit Delphi-Referenz durchsuchenTFieStream.Write oder WriteBuffer geschrieben
3) Beim Programmende zestörst du den Stream

Beispiel:

Delphi-Quellcode:
var
  Stream: TFileStream;

procedure TForm1.Create(Sender: TObjet);
begin
  Stream := TFileStream.Create('Dateiname', fmCreate);
end;

procedure TForm1.ReadEvent(Data: Cardinal); //Kann auch jeder andere Typ sein
begin
  Stream.WriteBuffer(Data, sizeof(Data));
end;

procedure TForm1.Destroy(Sender: TObject);
begin
  Stream.Destroy;
end;
  Mit Zitat antworten Zitat