Delphi-Quellcode:
var data_src_light : Array[0..150,0..150] of Integer;
var f: file of byte;
begin
BlockWrite(f,data_src_light,
SizeOf(data_src_light[0])*length(data_src_light));
sollte nicht sowas in der Art gehen? (jetz nicht wirklich viel drüber nachgedacht)