ich hab noch etwas gegoogelt und das hier gefunden:
Code:
AssignFile(cubemapfile,path+'.mat');
Rewrite (cubemapfile);
for a:= Low (cubemap) to High (cubemap) do
begin
Write (cubemapfile,cubemap[a]);
end;
CloseFile (cubemapfile);
result:=true
CubeMap:tCubeMapData;
CubeMapFile:file of tCubeMapData;
a:integer;
der path ist der dateiname als string.
beim ausführen wird auch eine Datei geschrieben, doch ich weiss nicht wie ich sie lesen kann.
hier noch mein record:
type
TCubeMapData=record
name:string[255];
uptex,downtex,fronttex,backtex,lefttex,righttex:
tp icture;
mode:tgltexturemappingmode;
end