Hallo Ihr,
mal wieder Probleme:
ich möchte gern ein dynamisches Array in eine untypisierte Datei schreiben.
Als Typen habe ich dafür definiert:
Delphi-Quellcode:
type
TTSFCoord = packed array[0..2] of single;
PTSFCoords = ^TTSFCoords;
TTSFCoords = packed array[0..0] of TTSFCoord;
Das Problem ist, wie weise ich meinem dynamischen Array "koordinaten" vom Typ TTSFCoords eine Länge zu?
Mit setLength(koordinaten,wert) bekomme ich eine Fehlermeldung: Incompatible Types. Dabei ist "wert" eine Zahl vom Typ longint.
Definiere ich den Typ TTSFCoords statisch, also z.B.
TTSFCoords = packed array[0..2] of TTSFCoord
so funktioniert es, und ich kann "koordinaten" mit Werten belegen.
Lasse ich in der Typdeklaration das [0..0] weg, also
TTSFCoords = packed array of TTSFCoord;
und vergebe die dann mit setLength(koordinaten,wert), so funktioniert das.
Allerdings bekomme ich dann Fehlermeldungen, wenn ich das dynamische array in die untypisierte Datei einlesen will.
Dafür definiere ich mir noch einen Zeiger koordinatenzeiger
TSFCoords und weise dem die Adresse von "koordinaten" zu: koordinatenzeiger := @koordinaten;
und schreibe in die Datei wie folgt:
BlockWrite(Datei,koordinatenzeiger^,PointCount*sizeof(TTSFCoord));
wobei PointCount vom Typ longint und vorgeben ist.
Lese ich die so erzeugte Datei nun in ein dafür vorgesehenes Programm ein, bekomme ich den Fehler Überlauf bei Gleitkomma-Operation.
Nun verstehe ich nicht, warum.
Ich weiss, viele Fragen auf einmal, aber vielleicht kann mir wer helfen?
Danke, frea!