Ver Mensaje Individual
  #6  
Antiguo 24-07-2007
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
Bien, entonces volvamos sobre los Streams. Existen un tipo de Stream, llamado TMemoryStream, que nos permiten almacenar datos en memoria. Así que solo tenemos que crear un Stream de este tipo, cargar el archivo y guardarlo donde queramos.

Vamos con un poco de código:
Código Delphi [-]
// Primero declaramos el Stream como variable global
Stream: TMemoryStream;

// En el evento OnCreate, por ejmplo, lo creamos
Stream:= TMemoryStream.Create;

// En el evento OnClose, por ejmplo, lo desturimos
Stream.Free;

// Para cargar el archivo
Stream.LoadFromFile('Origen.jpg');

// Para guardar el archivo
Stream.SaveToFile('Destino.jpg');

¿Nos vamos acercando a lo que tu quieres?

Última edición por seoane fecha: 24-07-2007 a las 14:50:39.
Responder Con Cita