Le 6 févr. 07 à 18:47 Soir, Frank Bitterlich a écrit:

Or simply copy it "manually" by using two BinaryStreams, like...

  define kBlockSize = 1000000 // 1 MB

  dim strm1, strm2 as BinaryStream

  strm1 = file1.OpenAsBinaryFile(false)
  strm2 = file2.CreateBinaryFile("audio/x-mp3")
  // Caution: add error checking!
  do until strm1.EOF
    block = strm1.Read(kBlockSize)
    strm2.Write block
  loop

That would be platform-independent (although not as fast as a native OS file copy, I suppose).

Thanks. That's indeed a good way.

However, since I already have a shell object and my application is just for me (and I just use Macs) I'll use the ditto command._______________________________________________
Unsubscribe:
<[EMAIL PROTECTED]>

REAL Software has decided to consolidate this mailing list with the online Forums.  
On Monday, February 12, 2007, this mailing list will no longer be active.  We 
encourage you to continue your REALbasic and REAL SQL Server discussions on the 
Forums.  If you are not presently a member of the forum, please sign up today at 
<http://forums.realsoftware.com>.

Reply via email to