Hello, RBNUBE.

> I've looked into this before and have done a lot of surfing trying to find
> out how to reference pasted "files" in RB.  There doesn't seem to be any
> obvious way of dealing with this situation.  I have found posts were people
> have gotten the name of the file dropped, but apparently no other useful
> information.  The rest has just been speculated on.

> I also found something that extends the RB clipboard.  From the example
> included, I can't understand how to extract any useful information from it.

> If you can, please share.  Follow the URL below.

> http://www.ljug.com/sw/rbextra.html

Thanks!

I get a full path to copied file (i=5 for Windows) but this code is not 
processed
multiple files yet.

  fi=GetFolderItem("clpbrd")
  bs=fi.CreateBinaryFile("text")
  cb = new extendedClipboard
  f = cb.numberOfFlavors-1
  s = s + "There are "+str(f+1)+" types on the clip"+endOfLine + endOfLine
  for i = 0 to f
    data = cb.flavorAtIndex(i)
    'data = format(lenb(cb.macdata(data)),"-#")
    data = cb.macdata(data) 
    s = s + cb.flavorAtIndex(i) + " (" + format(lenb(data), "#")+ " 
bytes)"+endofLine
   if i=5 then
    
bs.Write(ConvertEncoding(DefineEncoding(data,Encodings.UTF16),Encodings.UTF8))
   end if

  next
  bs.Close()
  'mb.long(0) = 49628
  //s= s + endOfLine+cb.macData(mb.stringValue(0, 4))
  clipText.text = s


-- 
  Nikolay Kuznetsov

RB2006r2 Pro,Win XPSP2 Pro
MacOSX10.3/PearPC+iBookG3, UbuntuLinux/VMWare


_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to