Access Violations beim Zugriff auf ein Record

[NewPiccolo]

Hallo,

ich habe ein Problem festgestellt, welches mit dem Reservieren, bzw. Nutzen von Speicherplatz bei Records mit extrem großen fixed-size Arrays auftritt.

Delphi-Quellcode:

 
 TBigRecord = record
   Value: array[0..104857600] of Byte; // 100 MB
 end;


...

procedure TForm1.btRecordClick(Sender: TObject);
var
    Rec: TBigRecord;
    I: Integer;
begin
    for I := Low(Rec.Value) to High(Rec.Value) do
        Rec.Value[I] := $64; // only if assignment is done, the access violation occurs
end;

Jetzt bin ich mir nicht sicher, ob es an dem zu kleinen Speicherplatz liegt oder daran, dass ich Speicherplatz für Records doch explizit reservieren muss.

Denn folgender Code läuft ohne access violations

Delphi-Quellcode:

procedure TForm1.btRecordClick(Sender: TObject);
var
    Rec: ^TBigRecord;
    I: Integer;
begin
    GetMem(Rec, SizeOf(TBigRecord));
    try
        for I := Low(Rec.Value) to High(Rec.Value) do
            Rec.Value[I] := $64;
    finally
        FreeMem(Rec);
    end;
end;

Hat jemand eine Idee, was beim obigen Code falsch läuft?

Grüße
Piccolo