Archive to Blob

TECH TIP: Loading an Archive File to a Blob (or memory stream)

You can easily write a routine to take a .RAF file and load it into a blob field or a TMemoryStream: 

myFileStream := TFileStream.Create('myArhcive.RAF', fmOpenRead);

myFileStream.Position := 0;
myBlobField.LoadFromStream(myFileStream);

myFileStream.Free;

OR

myMemoryStream := TMemoryStream.Create;

{note: passing 0 as the second parameter will copy the entire stream}
myMemoryStream.CopyFrom(myFileStream, 0); 

myMemoryStream.Free;