Ver Mensaje Individual
  #2  
Antiguo 18-01-2008
Avatar de Crandel
[Crandel] Crandel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Parana, Argentina
Posts: 1.475
Reputación: 23
Crandel Va por buen camino
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
__________________
[Crandel]
Responder Con Cita