[MACTCL] adding a cutom preview image to a file

[Uwe K. <uwe...@gm...>]

Hi everybody,
I've been tinkering about how to add a custom preview image to a file  
for display in both the finder and in the tk_getOpenFile dialog.

NavServices tells me to add a  "pnot" resource containing a PICT  
image to the resource fork of the file.

Assuming that I could access the file's resource fork from within tcl  
using the "../namedfork/rsrc" mechanism I still have to figure out  
how to format the data properly before appending it to the resource  
fork.

Can someone give me a clue?

kind regards,
Uwe