Hi,
mit Filestreams habe ich bisher nicht viel gemacht.
Aber mit den File of ... Deklarationen:
Delphi-Quellcode:
type
TElementStyle = (esRechteck, esDach, esFenster, esTuer);
TElement = record
Name : String;
Data : TRect;
cFill, cBorder : TColor;
Style : TElementStyle;
end;
var
Elements : Array of TElement;
f1: File of Elements; // Elements müsste glaube ich auch ein Type sein
f2: File of TElement; // also besser so
elem: TElement;
procedure tuwas;
begin
AssignFile(f2, Datei);
Reset(f2); // Typisierte Datei! zum Schreiben öffnen
Write(f2, elem);
CloseFile(f2);
// später, woanders
Read(f2, elem);
Seek(f2, 4711); // Datensatznummer anspringen
Read(f2, elem);
end;
Mit den Strings wurde ja schon angesprochen.
Gerade das mit dem Seek eröffnet eine recht flexible rudimentäre Datenbank. Könnte bei Bedarf ein Beispiel rauskramen. (Vielleicht habe ich das sogar schonmal hier irgendwo gepostet
)
Gruß
Michael