Readbuffer in mehrdimensionales Array

[CPO]

Hallo. Ich habe folgendes problem:
Ich lese 20 Bytes aus einem Filestream in ein 2dimensionales Array ein.

Wie kann ich nun beeinflussen, dass die Bytes horizontal oder vertikal (grafisch vorgestellt)
eingelesen werden.

Bei meinen versuchen klappt nur ein vertikales Einlesen (also in eine Spalte);

Bei diesem Versuch in Zeilen einzulesen kommt nur Müll heraus:

Delphi-Quellcode:

var dummyy:integer;                       
    Incoming:TFileStream;                                   
    cbytes:longint;
begin

Incoming:=TFilestream.Create(Th_PfadDaten,fmOpenRead);                        

for dummyy:=0 to 19 do                                                   //Zeilen abarbeiten
    begin
    Incoming.Seek(XY2Pos(Th_x0,dummyy,Th_xmaxdat,Th_typedefdat),soFromBeginning);    //Zu Position im Filestream gehen
    Incoming.Readbuffer(Th_DataArray[1,dummyy],20);                   
    end;
FreeAndNil(Incoming);