Есть следующее:

temp : array of string[30];
BS: TADOBlobStream;
...
SetLength(temp, st2.tablesX*st2.tablesY);

DB1.ReportArr.Insert;
DB1.ReportArr.Fields[1].AsInteger := st1.idStudent;
DB1.ReportArr.Fields[2].AsInteger := st1.idLab;
DB1.ReportArr.Fields[3].AsString := chr(st2.tablesX);
DB1.ReportArr.Fields[4].AsString := chr(st2.tablesY);

BS := TADOBlobStream.Create(DB1.ReportArrarray, bmWrite);
try
BS.WriteBuffer(temp, 65000{st2.tablesX*st2.tablesY*30});
finally
BS.Free;
end;
DB1.ReportArr.Post;

Когда записывается BLOB, то туда скидывается какой-то мусор...
Затем я увеличил длину до 65000 и перемещаясь по записаному мусору на адресе 45Ah увидел массив, который
я хотел записать Собственно может мне кто сказать где здесь глюк?