Datei mit FileStream auslesen

[delphinewbie]

@Gausi,
danke, aber ich bekomme die gleiche Fehlermeldung, nur sind die Adressen, bei denen die Zugriffsverletzung auftritt anders.

Ich bin ratlos

[DeddyH]

Zitat:

Delphi-Quellcode:

Length_of_Reserve_string : array[1..32] of byte;
...
Read(ds.Length_of_Reserve_string[i],sizeof(word));

Das Array ist 32 Byte groß, Du liest aber 64 Byte (Word = 16 Bit). Außerdem müsstest Du (wenn ich das richtig sehe) wohl erst das Byte-Array komplett befüllen und erst anschließend das String-Array.

[delphinewbie]

ok, habe das array jetzt auf word gesetzt.

Length_of_Reserve_string : array[1..32] of word;
Reserve_string : array[1..32] of string;

Ich kann aber nicht erst das eine array füllen und dann das andere, weil die Reichenfolge beim Lesen eben so ist :
1. Lesen von 2 bytes (Länge L des nachfolgenden strings
2. Lesen von L*bytes ( der string selbst)
Oder habe ich dich falsch verstanden ?

Fehlermeldung bleibt leider immer die gleiche

[DeddyH]

Ob die Reihenfolge und die Datentypen so stimmen, weiß ich nicht, das hängt ja vom Dateiformat ab und nicht davon, wie Du den Record definierst.

[delphinewbie]

genau, und wenn die Daten aber richtig eingelesen werden (Vergleichbarkeit ist vorhanden), muss ja wohl von der Seite her alles o.k. sein.
Trotzdem muss ich irgendwas vergessen haben.Vllt. muss Speicher freigegeben werden oder die Datei wird nicht korrekt 'geschlossen' ?

Ich werde mal noch ein bissl probieren...

[p80286]

Hallo Delphinewbie,

zunächst solltest Du Dich mit dem Debugger (Tasten:F7, F8, F4 F5) vertraut machen, da kann man meist sehen wohin was gelesen wird.

Dann verwendest Du z.B.

Length_of_Reserve_string : array[1..32] of word; 1. Du bist sicher das es nur max. 32 Strings gibt?
2. Da ich die Struktur in Deiner Datei nicht kenne, ein Vorschlag ins Blaue

Delphi-Quellcode:

Type 
  mytype=record
           Feld1 : word;
           Feld2 : integer;
           ....
           textfeld : ansistring;
        end;

Den Weg den Du gewählt hast, halte ich für gefährlich, da zwei Werte die Länge eines Strings und der String selber in unterschiedlichen Variablen aufgenommen werden. Beide Werte gehören zusammen, und sollten nicht willkürlich getrennt werden.

Gruß
K-H

P.S.

Zitat:

Vllt. muss Speicher freigegeben werden oder die Datei wird nicht korrekt 'geschlossen' ?

Dann sollte der Debugger erst recht bemüht werden!

[blackfin]

Auch wenn es mit dem Fehler nichts direkt zu tun hat:
Zusätzlich zu den genannten Dingen solltest du dir vielleicht überlegen, deinen Record-Typ nicht bytes zu nennen.

Ich weiss, standardmäßig ist bytes nicht definiert, aber der Name wäre mir zu generisch und würde mir Bauchschmerzen in Hinblick auf die Zukunft bereiten. Eventuell kommt es irgendwann deswegen zu sehr merkwürdigen Fehlern, die man nicht mehr wirklich versteht, ähnlich wie wenn man reserved words von SQL-Datenbanken als Feldnamen benutzt oder Vergleichbares.
Zudem kommt, dass der Name so wenig aussagekräftig ist, dass du vielleicht in einem halben Jahr nicht mehr weisst, warum das Ding "bytes" heisst, obwohl es ja die Struktur einer definierten Datei angibt und nicht nur "irgendwelche Bytes". Nenn das Ding lieber nach dem Typ der Datei, je nachdem was es ist. Also zum Beispiel: CustomerFileBytes TCustomerFileBytes oder was weiss ich sonst

[himitsu]

Zitat von blackfin:

Ich weiss, standardmäßig ist bytes nicht definiert, aber der Name wäre mir zu generisch und würde mir Bauchschmerzen in Hinblick auf die Zukunft bereiten.

Da wir unsere Typen meißt mit einem T kennzeichnen ... TBytes gibt es schon.

[himitsu]

Wie sieht denn dein Code nun aktuell aus?

PS:

Code:

Read(ds.Length_of_Reserve_string[i],sizeof(word));

Hier ließt man ein WORD, aber die Variable ist nur ein BYTE groß.

[DeddyH]

Zitat von himitsu:

Code:

Read(ds.Length_of_Reserve_string[i],sizeof(word));

Hier ließt man ein WORD, aber die Variable ist nur ein BYTE groß.

*Seufz* das hatte ich in #6 bereits erwähnt