Hola Mike, aprende el uso etiquetas para tu codigo sea mas legible.
La idea es crear un archivo del tipo TCubo, el codigo seria algo asi:
Código Delphi
[-]
var
Archi: file of TCubo;
i,j,k: integer;
begin
AssignFile(Archi, 'nombre.dat');
Rewrite(Archi);
for i := 0 to 255 do
for j := 0 to 255 do
for k := 0 to 255 do
Write(Archi, CuboRGB[i,j,k]);
CloseFile(Archi);
end;
Suerte