TByteSOAPArray vs. TByteDynArray

[DeddyH]

An welcher Stelle knallt es denn? Ich glaube eher nicht, dass es am Rückgabetypen liegt. Hast Du mal versucht, die alten Pascal-Routinen (AssignFile, BlockRead, etc.) durch Streams zu ersetzen?

[Samashy]

Nein leider nicht, mit Streams habe ich noch nichts gemacht.

es knallt in der While-Schleife bei der zweiten Runde

Code:

 while (BytesRead = BLOCK_SIZE ) do
      begin
        BytesToWrite := Min(Count, BLOCK_SIZE);
        BlockRead(F, pTemp^, BytesToWrite , BytesRead );
        pTemp := Pointer(LongInt(pTemp) + BLOCK_SIZE);
        Count := Count-BytesRead;
      end;

Speziell bei der Zeile:

Code:

 BlockRead(F, pTemp^, BytesToWrite , BytesRead );

[Der schöne Günther]

Ich versuche die Logik erst gar nicht zu verstehen, aber dass LongInt auf Windows immer 4 Byte sind (während Pointer halt entweder 4 oder 8 Byte sind) ist dir klar, oder?

[Samashy]

Danke, habe auf Int64 umgestellt

Werde mich aber zusätzlich mal mit FileStream beschäftigen