Hi,

try:

  dim f as 
FolderItem=specialfolder.Temporary.Child("test."+Self.TextField1.text)
  
  dim t as BinaryStream= BinaryStream.Create(f, true)
  t.close
  
  Self.mIcon=f.IconMBS(16)

I looks like the file must exist.

Greetings
Christian

-- 
Need a MBS Real Studio DynaPDF Plugin License? 
We have a sale till Christmas and that may be your chance!

More details and registration here:
http://www.monkeybreadsoftware.de/realbasic/plugin-dynapdf.shtml




_______________________________________________
Mbsplugins_monkeybreadsoftware.info mailing list
[email protected]
https://ml01.ispgateway.de/mailman/listinfo/mbsplugins_monkeybreadsoftware.info

Reply via email to